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IIS.  ABSTRACT  ■  "  ' 

This  report  summarizes  the  results  of  a  two-year  analytical  and  experimental 
effort  concerned  with  the  investigation  of  body  waves  and  surface  waves  in  isotropic 
and  anisotropic  half-spaces.  These  were  modeled  by  large  blocks  of  limestone  and 
Yule  marble,  respectively,  that  were  subjected  to  pulses  produced  by  the  impact  of 
steel  spheres  on  loading  bars  attached  normally  to  the  surface  of  these  blocks.  The 
measured  input  served  as  the  boundary  condition  for  an  analysis  of  the  system  that 
yielded  the  field  parameters  both  by  means  of  an  integral  transform  solution  and  a 
finite  element  procedure.  The  results  were  compared  with  stress  histories  measured 
by  specially-designed  and  calibrated  crystal  transducers.  The  dynamic  constants 
needed  for  the  anisotropic  analysis  were  obtained  from  wave  velocity  measurements 
in  various  directions  on  the  Yule  marble  block  and  an  optimization  procedure  sub¬ 
jected  to  certain  physical  constraints.  Static  and  dynamic  tests  in  tension 
and  compression  for  various  orientations  of  Yule  marble  samples,  as  veil  as  cyclic 
leading,  creep  and  some  fracture  test3  have  also  been  executed  on  sampxes  of  Yule 
marble . 
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ABSTRACT 

This  is  the  final  report  of  a  two-year  activity  involving  a  theoretical  and 
experimental  investigation  of  non-destructive  wave  propagation  resulting  from  the 
impact  of  steel  spheres  on  a  Yule  marble  block,  including  a  determination  of  its 
static  and  dynamic  mechanical  properties.  The  basic  system  was  modeled  as  a 
transversely  isotropic  half-space  with  the  axis  of  elastic  symmetry  lying  in  the 
free  surface  loaded  by  means  of  a  specified  normal  force  of  variable  shape  and 
duration.  This  simulates  the  experimental  conditions  where  a  large  block  of 
Yule  marble  is  loaded  by  metallic  bars  in  intimate  contact  that  are  subjected 
to  longitudinal  impact  of  steel  spheres  with  the  input  monitored  by  a  sandwiched 
crystal  arrangement .  Calibrated  crystal  transducer  packages  that  were  developed 
as  part  of  the  program  have  been  embedded  at  various  points  of  two  Yule  marble 
blocks  and  have  provided  records  of  the  transient  stresses  and  wave  velocities 

at  both  interior  and  surface  positions. 

A  solution  of  the  mathematical  model  has  been  accomplished  using  integral 
transform  methods  that  make  use  of  an  inversion  procedure  in  the  complex  plane 
involving  a  Cagniard-de  Hoop  path.  An  important  part  of  the  manipulation  involves 
the  evaluation  of  the  roots  of  this  path  from  a  sextic  algebraic  equation  that 
breaks  down  into  a  quartic  and  a  quadratic  factor.  Formulations  for  the  dis¬ 
placements,  strains  and  stresses  within  the  entire  domain  resulting  from  the 
application  of  a  point  load  on  the  surface  of  the  half-space  representing  a  Heaviside 
function  of  time  have  been  obtained,  characterizing  a  basic  solution  of  the 
problem.  The  determination  of  these  parameters  for  an  actual  impact  situation 
is  accomplished  by  convolving  the  measured  input  for  each  case  with  the  basic 
solution.  A  computer  program  has  been  developed  that  has  yielded  numerical 
results  for  the  predicted  stress  histories  at  selected  stations  corresponding  to 
certain  experimentally-determined  inputs. 
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A  finite  element  program  corresponding  to  the  integral  transform  analysis 
has  also  been  developed.  The  init'nl  application  of  this  program  was  the  prediction 
of  the  field  variables  in  a  block  of  limestone,  representing  an  essentially 
isotropic  material,  and  a  comparison  of  these  with  corresponding  experimental 
data  obtained  by  means  of  internal  transducer  packages  under  loading  conditions 
similar  to  those  described  above;  excellent  correlation  was  obtained.  The  program 
was  extended  to  the  transversely  isotropic  case;  satisfactory  correspondence 
was  found  to  prevail  between  the  predictions  both  of  the  integral  transform  and  the 
finite  element  solution  with  recorded  test  information.  However,  better  correlation 
with  the  data  existed  with  the  finite  element  technique  close  in,  and  with  the 
integral  transform  solution  at  more  distant  stations.  The  elastic  constants 
employed  in  these  evaluations  were  deduced  from  wave  speed  data  in  different 
directions  involving  the  actual  specimen  and  an  optimization  procedure  subject 
to  constraints  based  on  presumed  positive  values  of  these  parameters. 

The  macroscopic  properties  of  the  marble  were  obtained  both  by  petrographic 
and  mechanical  methods.  The  axis  of  transverse  isotropy  was  ascertained  by 
means  of  crystallography;  the  material  exhibited  an  average  crystal  size  of  0.5  mm. 
The  five  constants  describing  the  presumed  purely  elastic  behavior  were  obtained 
for  quasi-static  uniaxial  compression;  creep  tests  on  specimens  oriented  both 
parallel  end  perpendicular  to  the  symmetry  axis  indicated  little  viscoelastic 
behavior  at  low  stress  levels,  but  dominance  of  this  effect  near  fracture.  Com¬ 
pressive  quasi-static  stress-strain  curves  to  fracture  were  obtained  at  rates 
*6  2 

from  10  to  10  per  second  for  the  two  directions  of  interest,  and  numerous 
tensile  quasi-static  curves  were  also  secured.  Hopkinson-bar  experiments  on  rods 
cut  from  three  different  directions  yielded  the  values  of  the  dynamic  constants 
for  both  tensile  and  compressive  low  stress  levels,  amounting  to  about  twice 
the  corresponding  quasi-static  values.  Compressive  and  tensile  fracture  stresses 
parallel  and  perpendicular  to  the  axis  of  symmetry  were  obtained  from  split 
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Hopkinson-bar  specimens  possessing  a  special  contour  at  rates  of  10  per  second. 
The  totality  of  the  tests  conducted  indicated  that  the  material  behaves  in  a 
very  complicated  Tanner  even  at  low  stress  levels  and  that  the  use  of  appropriate 
material  constants  is  crucially  dependent  on  both  stress  level  and  loading 
history. 
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INTRODUCTION 

This  report  represents  tie  final  annual  technical  report  under  contract 
H0220021  between  the  U.S.  Bureau  of  Mines  and  the  University  of  California  on 
the  subject  entitled  "Wave  Propagation  in  Anisotropic  Rocks",  representing  the 
culmination  of  a  two-year  effort.  The  current  contract  period,  originally 
destined  to  expire  February  22,  1973,  has  been  extended  to  June  30,  1973  in 
order  to  permit  the  proper  correlation  of  the  various  aspects  of  the  program  and 
suitable  documentation  of  these  phases.  The  body  of  the  report  will  delineate 
the  objectives,  methodology  and  principal  results  of  each  of  these  subdivisions 
of  the  investigation  and  their  overall  connection;  the  details  of  the  individual 
efforts  are  recorded  in  appendices  which  are  self-contained. 

The  scope  of  the  program  was  detailed  in  proposals  identified  as  UCB-Eng  3154, 
dated  August  19,  1970,  and  UCB-Eng  3286,  dated  April  26,  1971,  and  submitted  on 
behalf  of  the  University  of  California,  Berkeley,  by  Werner  Goldsmith  as 
Principal  Investigator;  it  is  also  spelled  out  in  Article  I  of  the  subject 
contract.  Briefly,  the  investigation  can  be  divided  into  the  following  categories: 

(a)  Theoretical  Examination  of  the  Propagation  of  Body  Waves  in  a  Transversely 
Isotropic  Elastic  Solid  resulting  from  an  Impact  on  the  Free  Surface 

by  means  of 

(1)  Integral  Transform  Techniques 

(2)  Finite  Element  Methods; 

(b)  Experimental  Examination  of  the  Wave  Processes  corresponding  to  (a)  and 
the  Measurement  of  Stress  Histories  at  various  Selected  Positions  in  the 
Interior  or  near  and  at  the  Surface  resulting  from  Projectile  Impact  on 
a  Loading  Bar  in  intimate  Contact  with  a  large  Block  of  Yule  Marble 
simulating  a  Half- space; 

(c)  Determination  of  Mechanical  Properties  of  Yule  Marble  under  Static  and 
Dynamic  Loading  of  variously-oriented  Specimens. 
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Many  of  the  results  obtained  have  been  reported  previously  in  References  (1)  and 

(2). 

The  following  personnel  have  had  a  major  share  of  the  responsibility  of  the 
execution  of  the  various  tasks:  (i)  Mr.  S.  L.  3uh  who  pursued  the  integral 
transform  solution  and  produced  a  computer  program  that  yields  the  field  variables 
at  any  position  for  any  predetermined  input,  (ii)  Messrs.  M.  Katona  and  G.  Dasgupta 
who  successively  aided  in  the  development  of  a  finite  element  program  for  the 
subject  problem  that  has  been  successfully  applied  for  the  evaluation  of  the 
desired  parameters  both  for  an  isotropic  and  a  transversely  isotropic  half -space 
loaded  by  a  point  force  of  arbitrary  tijne  variation,  (ill)  Mr.  K.  Krishnamoorthy 
who  was  responsible  for  the  design,  development,  testing,  calibration,  installation 
and  use  of  the  transducers  and  their  packaging  that  have  yielded  stress  histories 
within  and  on  the  surface  of  limestone  and  Yule  narblc  blocks  under  impact  loading 
from  steel  spheres,  and  who  also  obtained  the  data  and  devised  the  technique  for 
the  specification  of  the  dynamic  elastic  constants  pertaining  to  the  actual  test 
sample,  and  riv)  Mr.  S.  Howe  who  conducted  the  crystallographic,  petrographic  and 
mechanical  tests  that  delineated  the  geometric  and  static  and  dynamic  material 
properties  of  the  Yule  marble.  These  students  are  utilizing  the  results  of  the 
Investigation  as  the  content  of  their  masters  theses  and  doctoral  dissertations 
Werner  Goldsmith,  Professor  of  Applied  Mechanics,  Department  of  Mechanical 
Engineering  and  Jerome  L.  Sackrvui,  Professor  of  Engineering  Science,  Departcent 
of  Civil  Engineering,  have  Jointly  supervised  the  program  from  its  inception  to 
its  conclusion  and  are  responsible  for  its  conduct.  In  addition,  the  project  has 
received  noticablc  technical  assistance  from  Mr.  R.  runner  in  the  Fortran  programing, 
from  Mr.  E.  Lin  in  specimen  preparation,  from  Mr.  Tom  Jones  in  instrumentation 
development,  frem  Mu*.  G.  Wilcox  in  general  laboratory  assistar  e,  and  from 
Mr.  R.  M.  Hamilton  of  the  Glassblrwing  Shop  of  the  Department  cf  Electrical 
liigineering  in  the  fabrication  of  the  transducers.  The  expert  assistance  of 
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Professor  R.  L.  Taylor  of  the  Department  of  Civil  Engineering  in  the  development 
of  the  finite  element  program  is  gratefully  acknowledged. 

The  object ives  of  the  program  have  been  aubatantially  fulfilled  with  the 
possible  exception  of  certain  aspects  of  fracture  initiation  and  propagation. 

It  was  originally  anticipated  that  this  portion  of  the  work  would  require  a  period 
in  excess  of  the  two  years  that  represented  the  life  of  the  contract.  When  advice 
was  received  that  a  continuation  of  the  support  was  not  to  be  expected,  it  was 
de  ided,  with  the  consent  of  the  Technical  Monitor,  not  to  initiate  such  an 
investigation  since  it  would  have  to  be  abandoned  before  successful  techniques 
could  be  adequately  developed.  On  the  other  hand,  a  host  of  information  not 
specifically  contained  in  the  contract  has  been  obtained  as  a  byproduct  of  the 
research.  This  includes  information  on  surface  waves  obtained  experimentally, 
and  the  definition  (and,  in  a  manner  of  speaking,  the  resolution)  of  difficulties 
associated  with  an  analytical  investigation  of  surface  waves  produced  by  impact 
on  transversely  isotropic  half-spaces. 

The  results  obtained  represent  not  only  a  significant  advancement  of  the  field 
of  wave  propagation  in  elastic,  anisotropic  media,  but  should  have  considerable 
applicability  to  the  interpretation  of  signals  that  might  be  employed  by  trans¬ 
mitters  in  rapid  tunneling  or  excavation  situations  to  send  the  character  of  the 
rock  formations  ahead  of  the  boring  device,  and  also  should  be  of  utility  for  parallel 
circumstances  in  the  field  of  geophysical  prospecting.  The  transducer  package 
developed  and  its  successful  application  for  the  measurement  of  internal  transient 
stresses  could  find  widespread  employment  in  a  nultitudc  of  fields  involving  basic 
research,  design  and  development,  testing  and  production  of  large-scale  components 
with  potential  problems  due  to  local  stress  concentrations  or  overloads.  Finally, 
the  techniques  employed  for  the  property  determination  of  the  rock  employed  here 
are  individually  not  new,  but  the  totality  of  the  various  tests  has  not  been 
prev  usly  brought  to  bear  on  a  single  natural  rock  to  ascertain  its  behavior  pattern. 
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!♦  had  been  the  intention  of  the  research  teas  to  suggest  the  continuation 
of  the  effort  for  the  purpose  of  extending  the  result,  to  a  variety  of  natural 
r  ks.  Wi.  h  very  ittlc  effort,  the  finite  eleaent  program  developed  could  be 
adapted  to  an  orthotropic  naterial  such  a.  Parre  granite,  which  occur,  widely 
In  the  field.  With  further  modi f< cations,  it  .hould  be  possible  to  include  the 
effect,  of  fault  zone,  or  other  dl.contlnultie.  in  the  prograa,  end  to  incorporate 
♦he  effect,  of  reflection,  fro®  bounding  eurfaceo.  Thl.  aspect  of  a  continuing 
lnv  .t ^gatlon  night  lead  to  the  Identification  of  specific  diacontinultle.  in 
rock  .trata,  a  subject  believed  to  be  of  vast  interest,  it  was  further  hoped  to 
attack  a  new  pharc  of  importance  in  rock  removal,  namely  a  fundaaer.tai  study  of 
*he  rrainitlon  process.  Scoe  very  preliminary  experiment,  in  thl#  direction 
ipi-arcd  to  indicate  potential  for  a  successful  pursuit  of  this  objective.  Such 
investigations  will  now  have  to  be  relegated  to  the  future,  and  if  initiated 
at  all,  will  be  sponsored  and  monitored  by  different  agencies,  although  the 
g-oup  having  pricary  Interest  In  these  domains  is  the  U,S.  Bureau  of  Mines. 

TECHNICAL  ACC0MPLISIC-EK7S 

'a'  Theoretical  Examination  of  the  Propagation  of  Body  Waves  in  a  Transversely 
Isotropic  Elastic  Solid  resulting  from  a  Norral  Impact  on  the  Free  Surface. 

The  governing  equations  for  the  phy.lc.l  problem  Involve  the  constitutive 
-elation.,  the  equations  of  motion  and  compatibility,  and  suitable  Initial  and 
boundary  conditions.  For  n  generally  anisotropic  hair-space  subject  to  a  normal, 
concentrated  time-dependent  load,  the  constitutive  equations  are  given  by 

ClJ*ClJMV/-*W“k,  (1) 

where  Ul  1.  the  dl.pl.ceaent  vector,  and  arc  the  stre.a  and  strain  tensors, 
ret pect  vely,  and  clJR£  is  the  fourth-order  tensor  defining  the  elastic  constants 
thi*  trust  sa*is<V  symmetry  relations 
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Cijk£  =  cjik*  =  ciJ iH  "  Ckjtij 

As  usual,  a  comma  denotes  differentiation  with  respect  to  the  succeeding;  variable 
(s)  and  a  summation  convention  applies  to  repeated  indices  for  the  spatial 
variables.  For  small  displacements  in  a  homogeneous  medium,  the  equation  of 
motion  in  the  absence  of  body  forces  is 

Cijkjt  \,JLi  =  p  ui,tt  (3) 

in  a  Cartesian  coordinate  system  with  p  as  the  mass  density  and  t  as  time.  For 
a  free  surface  defined  by  the  plane  x^  =  0,  the  boundary  conditions  prescribed 
is  given  by 


Ci2kjt  \,jt  <xi>°>x3>t>  "  6i2f  <t>  6  (*0 

where  6.^  is  the  Kronecker  delta,  f<t>  is  the  arbitrary  preselected  force  history, 

and  b<xltx^>ia  the  two-dimensional  Dirac  delta  function.  The  radiation  condition 

at  infinity  is  also  invoked,  and  initial  quiescence  is  presumed.  Unfortunately, 

a  solution  of  the  general  problem,  while  well  posed,  is  probably  beyond  the  state 

of  the  art  and  of  computational  aids  at  the  present  time  by  purely  analytical 

means,  although  its  evaluation  by  purely  numerical  techniques  appears  quite  feasible. 

However,  the  stipulation  of  a  transversely  isotropic  medium  as  a  special 

case  simplifies  the  problem  sufficiently  so  as  to  permit  a  solution  essentially 

in  closed  form  by  means  of  integral  transform  methods.  It  should  be  emphasized 

that  this  situation  is  considerably  more  complicated  than  the  quasi -isotronic  case 

(3) 

treated  by  Kraut  where  the  axis  of  elastic  symmetry  is  perpendicular  to  the 
free  surface;  in  the  present  case  this  axis  lies  in  the  surface  of  the  half  space. 

A  theoretical  and  experimental  investigation  for  such  a  situation  had  been 
undertaken  previously  for  the  particular  purpose  of  examining  surface  wave 
motion  .  The  experiments  yielded  surface  wave  group  velocity,  group  slowness, 
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amplitude  and  attenuation  curves  for  the  Yule  marble.  The  slowness  curves  were 
compared  to  corresponding  analytical  phase  and  group  slowness  predictions  using 
both  static  and  dynamic  constants  determined  in  that  study,  with  reasonable 
correspondence.  The  present  program  addresses  itself  to  the  much  more  difficult 
problem  of  the  analysis  of  body  wave  propagation. 

The  stress -displacement  equations  for  the  solid  under  consideration  are 
given  by 


CT11 = 

C11 

ui,i4 

■  C12 

U2,2 

+  C13  U3,3 

II 

OJ 

C12 

ui,i  ^ 

’  C11 

U2,2 

+  C13  U3,3 

ct33  = 

C13 

(ui,i 

+  U2 

j2}  + 

C33  U3,3 

ct23  » 

c44 

(u3,2 

+  u2 

,3^ 

a13  = 

c44 

(u3,l 

+  U1 

,3^ 

al2  = 

h  (< 

"11  '  C 

'12^ 

al,2  4 

'  u2,l^ 

(5) 


employing  standard  contracted  notation  c^  with  m,n  -  1, ...,6  instead  of  the 
four-index  notation  employed  in  Eq.  (l).  The  equations  of  motion  for  this  case 
reduce  to 

clul,ll  +  c2  ul,22  +  C3  ul,33  +  (cl  '  c2)u2,2l  +  C4U3,31  =  ul,tt 
(C1  -  c2)ulj21  +  c2  u2jll  +  c1  u2j22  +  c3  u2j33  +  cu  u3  32  =  u2>tt 

c4  ul,31  +  c4  u2,32  +  c3  U3,ll  +  °3  U3,22  +  °5  U3,33  =  U3,tt 

where  five  new  independent  constants  have  been  introduced  using  the  abbreviations 

C1  hcii/p  ;  c2  =  ^cii  '  C12)/p  5  c3  H  c44^ p  ’  c4  =(c13  +  c44)/p  ;  c5  5  c33//p  (7) 


(6) 


Equations  (6)  together  with  the  initial  and  boundary  conditions  previously  cited 
constitute  the  boundary  value  problem  to  be  solved  for  the  wave  propagation  problem 
in  a  transversely  isotropic  half-space  due  to  arbitrary  surface  loading. 


(  i)  Integral  Transform  Technique 

The  governing  relations  for  the  problem  were  subjected  to  a  one-sided  Laplace 
transform  and  a  double  Fourier  transform  as  described  in  Refs,  (l)  and  (5).  This 
leads  to  a  system  of  three  second-order  coupled  ordinary  differential  equations. 

A  solution  assumed  in  the  form  of  an  exponential  iecaying  with  direction  xg  leads 
to  a  homogeneous  system  of  algebraic  equations  in  terms  of  the  coefficients  of  the 
twice  transformed  displacement.  The  conditions  for  a  non-trivial  evaluation  of 
this  system  yields  a  sextic  algebraic  equation  that  decomposes  into  the  product 
of  a  biquadratic  and  a  auadratic  factor  which  define  the  slowness  surfaces  of  the 
medium.  These  surfaces  constitute  the  reciprocal  vectors  of  the  phase  velocity 
for  the  material,  consisting,  in  general,  of  three  surfaces  for  a  transversely 
isotropic  material  )(7)^  The  method  described  is  the  solution  of  an  eigenvalue 
problem  which  provides  both  the  eigenvalues  and  the  associated  eigenvectors  that 
are  ipso  facto  the  coefficients  of  the  transformed  displacement  components. 

Use  of  the  transformed  boundary  conditions  eliminates  the  unknown  arbitrary 

constants  and  provides  the  displacement  in  the  transform  space;  the  Fourier 

inversion  theorem  permits  the  restatement  of  the  displacement  components  solely 

in  the  Laplace  transform  space.  Inversion  of  this  expression  into  the  real  time 

domain  is  expedited  by  use  of  a  spherical  polar  coordinate  system  R,  0,  with 

0  as  the  meridional  and  ^  as  the  azimuthal  angle  for  the  x-^-x^  plane  rod  the  use 

of  complex  variables  for  employment  of  a  method  of  solution  due  to  Cagnlard  and 

(8)(9' 

de  Hoop  ' .  This  transformation  yields  a  path  in  the  complex  plane  whose 
intersection  with  the  real  axis  defines  the  slowness  surfaces  of  the  medium  and 
represents  an  absolutely  necessary  condition  for  the  solution  of  the  problem. 

A  major  portion  of  the  numerical  effort  was  concerned  with  this  subsection  of  the 
analysis  and  its  evaluation  provided  some  impor  .ant  physical  insight  into  the 
possible  behavior  patterns  of  the  substance  characterized  by  different  polar 
angles.  Upon  employment  of  this  procedure,  the  time-transformed  solution  ciuld 
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be  inverted  into  the  real  plane  by  inspection,  and  the  displacement  field  for 
♦he  entire  half-space  was  readily  programed.  A  corresponding  procedure  was  adopted 
for  the  delineation  of  the  strain  and  stress  variable*,  utilizing  an  initial  ana¬ 
lytical  definition  for  these  quantities  fron  derivatives  of  the  displacement 
components  rather  than  utilizing  a  numerical  differentiation  from  the  evaluated 
'Kspxaccracnt  solutions.  The  numerical  procedure  vas  effected  by  calculating 
a  solution  for  a  "basic"  input  consisting  of  a  Heaviside  step  function  and  then 
convolving  a  realistic  input  with  this  solution.  Both  a  sine-squared  input, 
considered  to  be  a  reasonable  representation  of  sphere  impact  loading  on  a 
half-space,  as  well  as  actually  measured  pressure -tine  inputs  were  convolved  with 
the  basic  solution  to  provide  the  history  of  the  field  variables  for  the  actual 
physical  situation  that  was  to  be  analyzed. 

An  attempt  vas  also  node  to  evaluate  the  field  variables  on  the  free  surface 
of  the  medium  by  taking  the  limiting  conditions  o*  the  solution  for  the  case  when 
the  angle  of  the  ray  along  which  these  parameters  were  to  be  obtained  approached 
9°  de8rees  relative  to  the  normal  to  the  imc  surface.  Here,  the  Cogniard-de  Hoop 
path  collapses  to  the  real  axis  which  contains  a  Fay*elgh  pole.  Sine*  the  path 
°f  lnbegration  oust  be  deformed  to  exclude  this  singularity,  the  resulting  detour 
around  this  pole  no  longer  corresponds  to  real  tine  and  the  contributions  from  the 
Rayleigh  pole  must  be  evaluated  separately;  this  requirement  introduced  serious 
numerical  difficulties  as  it  yielded  rapid  and  extreme  oscillations  into  the 
so  ution  of  the  basic  problem  so  that  the  numerical  results  were  significantly 
suspect.  Jir.cc  the  solutions  within  the  free  surface  were  thus  not  nmenable  to 
treatment  by  the  method  indicated,  results  for  s*  :h  stations  were  deduced  by 
cons  dering  rays  at  very  small  angles,  of  the  order  of  0.1  degrees  from  the  free 
surface  direction  where  the  numerical  solution  exhibited  regular  behavior,  although 
portraying  its  tendency  tovrinis  singular  behavior  with  a  diminishing  value  of  this 
angle . 


Details  of  this  portion  of  the  investigation  are  presented  in  Appendix  A. 

A  comprehensive  description  of  this  work  and  its  background  will  also  be  found 
in  the  doctoral  dissertation  by  S.  L.  Suh  presented  to  the  Graduate  Division 
of  the  University  of  California,  Berkeley,  in  1973. 

(ii)  Finite  Element  Technique 

A  finite  clcoent  computer  code,  FEAP-71,  developed  at  the  University  of 
California  has  been  adapted  and  extended  for  application  to  the  present  problem. 

It  is  a  re  sc  arch -oriented  finite  clca*oiit  asseably  program  with  a  selection 
library  of  twenty  elements,  extensive  input-output  utility  routines  and  automatic 
err  -r  '“heeking.  The  present  formulation  includes  the  construction  of  a 
three-dimensional  element,  associated  time  integration  schemes  suitable  for  use 
in  a  wave  propagation  problem,  which  are  represented  by  an  Important  subroutine 
entitled  EXPIXTT,  a  printer  plot  subroutine,  DY1.TLT,  for  the  visualisation  of  stress 
evolution,  and  options  to  utilize  cither  analytically  specified  input  functions 

or  tabular  information  denoting  the  value  of  the  impulsive  load  at  each  time 
st<?p. 

ihc  dynas i c  formulation  of  the  finite  clement  method  as  derived  from  Lagrange's 
ent rai  Principle  was  indicated  in  Ref.  1,  The  resultant  set  of  coupled  linear 
differential  equations,  given  by 

CKl  {«]  ♦  [K]  [C)  -  (f)  (8) 

where  [Ml  is  the  diagonal  coos  matrix,  (K)  is  the  global  stiffness  matrix,  (fl) 
is  the  nodal  displacement  vector  for  the  entire  domain,  (3)  is  the  nodal 
a  '"deration  vector,  and  (fl  is  the  loading  vector.  The  solution  is  executed  by 
a  step-by-atep  forward  integration  method  known  as  Sewmark's  Beta  method.  The 
technique  was  initially  applied  to  come  test  cases,  but  has  since  been  esployed 
for  the  evaluation  of  the  stress  field  in  an  isotropic  half-space,  as  modeled  by 
a  limestone  block,  where  comparison  with  experimental  information  is  available, 
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and  has  finally  been  applied  to  the  evaluation  of  the  corresponding  transversely 
Isotropic  case  as  represented  by  sphere  Impact  on  the  Yule  narble  block. 

A  report  constituting  a  User's  Manual  for  the  use  of  the  FEAT -7?  program 
as  applied  to  vave  propagation  problems,  with  several  sample  situations  evaluated, 
was  previously  furnished* i0; .  An  updated  version  of  the  prograa  Is  Included  with 
this  final  report  as  Appendix  B.  This  document  differs  fro®  Ref.  (10)  prlnarlly 
In  sooe  of  the  modifications  providing  for  greater  efficiency  of  execution,  the 
Inclusion  of  a  provision  for  determination  and  use  of  a  critical  tljsc  step  to 
avoid  Instabilities  In  the  solution,  and  greater  flexibility  In  the  Input-output 
arrangeoents  cf  the  prograa.  The  results  froa  the  orograa  arc  presented  along 
with  corresponding  Information  froa  the  Integral  transform  solution  and  from  the 
experimental  phase  of  the  Investigation. 

(b)  Experimental  Examination  of  Wave  Processes  In  Blocks  of  Katural  Rock 

The  expcrlaental  determination  of  stress  histories  In  the  Interior  of  rock 
blocks  of  sufficiently  large  dimensions  to  simulate  half-spaces  during  the  tine 
of  Interest  were  conducted  on  a  15"  x  15"  x  llj”  block  of  Bedford  llaestone  and  a 
?U"  x  2U"  x  10"  block  of  Yule  marble.  In  addition,  measurements  very  close  to  the 
free  surface  were  performed  on  another  Yule  marble  block  of  the  same  dimension;  the 
axis  of  elastic  symectry  was  located  in  the  free  surface  so  that  a  nortal  load  on  the 
system  paralleled  an  axis  of  a  truly  transversely  lsotr  pic  half-space.  The  blocks 
were  loaded  by  shooting  3/l6"  and  diameter  steel  balls  from  an  air  gun  at 
velocities  of  about  20  ft/scc  against  the  plane  end  of  a  l/P"  diameter,  or, 
occasionally,  a  £"  diareter  alurlnua  loading  bar,  abjut  15”  long,  in  intimate  normal 
contact  *o  the  free  surface  of  the  specimens.  The  Input  pulse  to  the  block  was 
^naured  with  a  1/8"  or  a  diameter  X-cut  quartz  crystal  sandwiched  between  the 
loading  bar  and  the  block. 

The  development  of  appropriate  transducers  designed  to  censure  the  stress 
histories  In  the  block  Interiors,  their  construction,  calibration,  Insertion  and 
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f“U"ln*  »  “Jor  experimental  effort  „  dn.lld  in  Hefcrence.  (1) 

«nd  .  .  After  niny  different  device.  had  been  te.ted,  en  optima  arrangement 
““  pr0du'"1  eo»*l**l"«  ot  •  1/8"  diameter  m^mc.lu.  b.r,  vlth  .  length  of 
•bout  10  in,  «t  the  front  of  which  .  1/16"  diameter  X  O.CBO"  thick  PZT-h  crystal 
we.  sandwiched  between  mother  1/16"  lone  disk  of  magne.lum  of  1/8"  dimeter. 

•he  crystal  wes  .urrounded,  but  .cp.r.tcd  physlc.lly  from  en  annular  glass  washer 
*  cd  as  a  spacer;  the  trcn.duccr  lead,  were  brought  out  through  a  .lot  in  the 
nagneslus,  bar.  Voltage  amplification  was  employed  for  .tre.a  measurement;  the 
output  was  photographed  on  dual-bcam  o.clllopes  who.e  rezpon.e  was  fist  to  3 
rtega  lit.  The  tnmsducer  package  exhibited  a  good  acoustic  Lpedance  ..tch  relative 
to  that  of  both  the  limestone  and  the  Vule  marble  blocks,  thu.  minimizing  reflection 
problems  as  the  result  of  internal  ml.mntch.  The  rock  block,  wore  cored  to  the 
dc.lred  depth  in  direction,  perpendicular  to  their  .urface.  u.lng  a  1/8"  diameter 
drill;  the  installations  of  the  transducer,  was  accomplished  by  using  a  mixture 
Of  alualnun  oxide  and  epoxy  adhesive  as  the  bonding  agent. 

All  crystal  transducers  were  individually  calibrated  prior  to  installation 
t>  the  ucc  of  a  split  llopkln.on  bar  arrangement  composed  of  mngnc.lun  with  .train 
Gage,  mounted  on  the  bar.  fuml.hlng  a  direct  comparison  with  the  crystal  output. 
Each  transducer  was  externally  calibrated  u,l„g  a  split  Hopklnson  bar.  In  addition, 
a  comparison  of  In  situ  rcepon.c  in  rock  bar.  of  the  tran.duce  with  record,  from 
s'raln  on  the  surface  of  these  bars  provided  a  relationship  between  the  tvo 
Piezoelectric  con.tants  obtained  by  thc.e  two  types  of  measurement..  Thl.  ratio 
1.  employed  to  compute  a  stress  factor  that  converts  measured  voltage  to  the 
actus_  stress  extant  at  the  transducer  station. 

Appendix  C  which  provides  more  detail  on  this  phase  of  the  Investigation 
presents  schematics  of  the  locations  of  the  transducer  packages  in  the  licestonc 
and  in  the  two  narble  blocks.  The  results  of  representative  test,  are  shown  in 
lg3.  a- 4  together  with  the  neasured  Input;  these  data  arc  also  compared  to  the 
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analytical  or  numerical  predictions  shown,  with  the  degree  of  agreement  varying 
tr>  a  i.len* ,  in  no3t  inst  ances,  to  unsatisfactory  in  a  few  cases.  Excellent 
•’orrespondencc  between  the  measured  values  and  both  the  integral  transform  and 
finite  clement  calculations  was  uniformly  obtained  for  the  isotropic  limestone 
block  which,  analytically  had  to  be  regarded  as  a  slightly  anisotropic  material. 

For  *ole  marble,  results  near  the  source  were  found  to  be  very  well  predicted  by 
the  finite  element  method,  whereas  farther  into  the  medium,  the  integral  transform 
procedure  yielded  a  much  better  shape  for  the  first  portion  of  the  stress  history, 

•  rough  deviating  significantly  from  measured  values  after  one  cycle.  The  finite 
clcnent  technique  yielded  an  oscillatory  pattern  for  the  normal  stress  in  the 
direction  perpendicular  to  the  free  surface  at  positions  just  below  and  close 
to  the  load,  but  not  on  the  other  rays  in  the  half -space.  This  behavior  may  be 
due  to  an  inherent  characteristic  of  the  procedure  stemming  from  displacement 
boundary  conditions  along  this  ray  nnd/or  noise  introduced  into  the  input  by  the 
lis^rct ization.  It  is  not  a  priori  obvious  whether  other  failures  to  produce  an 
acceptable  degree  of  correlation  are  the  result  of  numerical  or  analytical  difficulties, 
ns  convergence  problems,  experimental  vagaries,  or  a  combination  of  these  causes. 

On  the  whole,  considering  the  difficulties  involved  in  all  these  processes, 
the  predict!  no  are  very  reasonable,  agreeing  qualitatively  almost  everywhere 
and  quantitatively  in  the  majority  of  instances  with  an  acceptable  degree  of 
error.  One  of  the  problems  involved  in  this  comparison  is  the  lack  of  precise 
knowledge  of  the  clastic  constants  (which  were  obtained  by  the  best  available 
procedure  described  above)  at  the  various  stations,  i.e.  a  possible  degree  of  local 
inhomogcncity  and/or  anisotropy.  It  is  also  possible  that  the  presumed  elastic 
model  must  be  modified  to  account  for  dissipative  effects,  particularly  in  view 
of  4  he  aberrant  behavior  of  the  material  exhibited  by  a  variety  of  static  and 
dynamic  tests  as  described  in  the  sequel  that  does  not  conform  to  any  published 
version  of  a  "simple"  substance. 
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The  impact  tests  on  the  Yule  marble  blocks  also  furnished  46  measurements 
°f  wave  arrival  times  at  various  stations  that  were  employed  to  devise  a  procedure 
of  determining  the  five  dynamic  elastic  constants  required  to  be  specified  by  the 
theory.  The  procedure  involved  the  use  of  the  phase  velocity  equation  and  devising 
an  objective  function  by  a  weighted  least-square  method  and  a  minimizing  procedure 
with  certain  embedded  constraints  determined  by  the  positive  definiteness  of  the 
elastic  stiffness  matrix  that  yielded  values  of  to  pc,.  ranging  from  11.2  x  lO^psi 
to  2.5?  x  10  psi.  These  values  were  intermediate  between  those  used  in  previous 
dynamic  analyses  for  Yule  marble^  those  obtained  independently  during  the 

present  investigation  from  a  separate  slab  of  the  material. 

(c)  Determination  of  Static  and  Dynamic  Mechanical  Properties  of  Yule  Marble 
The  macroscopic  mechanical  properties  of  Yule  marble  were  obtained  both  under 
static  and  dynamic  conditions  in  an  attempt  to  completely  characterize  its  con¬ 
stitutive  behavior  that  is  required  both  for  an  interpretation  of  test  results 
and  the  application  of  analytical  techniques.  Yule  marble  was  chosen  as  the 
basic  substance  for  the  present  investigation  because  (a)  numerous  tests  indicated 
that  it  was  macroscopically  homogeneous  (with  respect  to  typical  wave  length 
produced  by  impact)  and  transversely  isotropic,  (b)  it  was  available  in  sufficiently 
large  blocks  without  discontinuities  to  satisfy  the  requirements  for  a  physical 
model  in  the  present  tests,  (c)  it  had  been  previously  examined  on  a  number  of 
occasions  so  that  some  correlative  information,  particularly  in  the  geologic  and 
petrographic  domain,  was  available  for  comparison,  and  (d)  it  had  been  previously 

utilized  for  a  study  of  surface  wave  phenomena  under  the  direction  of  the  Principal 
(k\ 

Investigator K  . 

All  specimens  were  obtained  from  a  separate  marble  slab  obtained  commercially. 

The  specific  gravity  was  ascertained  to  be  2.8l,  with  average  crystal  sizes  ranging 
from  0.2  mm  to  0.7  mm.  It  was  original] y  assumed  that  the  axis  of  transverse 
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isotropy  was  coincident  with  the  average  normal  of  the  bedding  planes  which  are 
visually  evident  from  grey  bands  of  opaque  mineral  running  through  the  slab. 

Although  these  planes  are  sometimes  warped  and  are  not  completely  parallel  through 
the  rock  mass,  their  average  normal  was  found  to  be  relatively  constant  and  was 
located  in  the  largest  plane  of  the  slab.  From  thin  sections  taken  from  planes 
perpendicular  to  the  bedding  normal  (and  thus  orthogonal  to  the  assumed  axis  of 
transverse  isotropy,  or  Z-direction)  the  orientation  of  each  of  100  calcite 
crystals  was  obtained  spectroscopically  and  the  results  supported  both  the 
hypothesis  of  transverse  isotropy  and  its  direction  as  properly  being  perpendicular 
to  the  bedding  planes. 

Static  uniaxial  conpression  specimens  with  a  diameter  of  1.05  in.  and  lengths  of 
I-!-  ^n*  2  in.  for  the  X  and  the  Y,  Z  directions,  respectively,  were  tested  in 

an  Instron  machine  at  rates  ranging  from  10  to  10  per  second;  strain  was 
determined  from  l/8"  foil  gages  mounted  in  pairs  on  each  specimen  at  the  opposite 
end  of  a  diameter  and  connected  so  as  to  eliminate  flexural  components.  The 
results  appeared  to  be  independent  of  strain  rate  within  this  domain;  however,  the 
curves  were  uniformly  concave  upward  near  the  origin,  nearly  straight  in  the  middle 
third  of  the  stress  range,  and  concave  downward  in  the  upper  third,  the  data  in 
the  Z-direction  indicating  a  higher  failure  level  than  for  specimens  in  the  other 
two  directions.  These  tests  were  also  employed  to  obtain  Young's  modulus  and 
Poisson's  ratio  in  the  directions  along  and  perpendicular  to  the  axis  of  elastic 
symmetry  and  the  shear  modulus  in  any  plane  perpendicular  to  the  plane  of  isotropy; 
these  were  obtained  on  the  7th  cycle  of  a  0-1200  psi-0  loading.  The  results  from 
these  as  well  as  from  the  dynamic  tests  are  presented  in  Table  1.  It  was  necessary 
to  avoid  a  so-called  first-cycle  effect  which  yielded  appreciable  hysteresis; 
subsequent  loading  along  the  same  path  yielded  essentially  reversible  deformations. 
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Quasi-static  tensile  tests  at  rates  ranging  from  lO-8  to  10"3  per  second 
were  run  in  the  Instron  tester  for  various  sample  directions  and  with  various 
specimen  configurations,  including  a  modification  of  a  special  contour  previously 
utilized  in  tests  on  hone  specimens ^ 11 ^ 12 ) .  Difficulties  were  experienced  when 
uniform  specimens  were  cemented  to  aluminum  holding  pieces  placed  in  the  grips 
of  the  tester  by  failure  occurring  through  such  bonds;  stress -strain  curves  ob¬ 
tained  here  may  be  in  error  due  to  the  higher  section  where  the  gages  are  located 
and  any  apparent  strain-rate  sensitivity  may  be  largely  a  property  of  the  glue 
rather  than  that  of  the  specimen  proper.  Z-direction  special  contour  specimens 
were  tested;  a*  in  other  cases,  the  fracture  stress  was  a  function  of  the 

distance  of  the  strain  gage  from  the  break,  but  the  fracture  strain  in  all  cases 
was  about  0.025  percent. 

Y-  and  Z-direction  specimens  were  subjected  to  both  compressive  and  tensile 
creep  tests  in  order  to  determine  the  approximate  stress  levels  at  which  visco¬ 
elastic  effects  begin  to  dominate  the  material  behavior.  Compressive  specimens 
were  loaded  to  failure  in  approximately  700  psi  increments  at  a  rate  of  700  psi/sec 
using  an  MTS  testing  machine  in  the  constant  load  mode,  whereas  tensile  specimens 
were  loaded  by  weights  as  well  as  by  an  Instron  machine,  with  loading  rates  for 
the  latter  operation  limited  to  30  psi/sec;  these  were  not  tested  to  failure. 

No  significant  creep  was  observed  in  any  of  the  cases  except  in  the  vicinity  of 

the  failure  point  (6,900  and  10,000  psi  for  the  compressive  Y-  and  Z-  specimens, 
respectively) . 

Hopkinson  bars  composed  of  three  sections  of  rods  initially  6"  x  3/4",  of 
the  same  orientation  and  glued  together  were  supplied  with  aluminum  endcaps  to 
prevent  local  shattering  under  the  impact  of  f"  diameter  steel  balls  dropped  from 
a  height  of  22.5  in.  Longitudinal  and  transverse  gages  monitored  the  pulses  so 
produced  and  measured  wave  speeds  were  employed  to  yield  the  dynamic  elastic 
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constants  equivalent  to  those  determined  from  static  tension  and  compression 
*ec*s,  shown  also  in  Table  1,  by  seans  of  a  one-dimensional  analysis.  The 
latter  type  of  hypothesis  is  validated  by  the  ratio  of  bar  radius  to  pulse 
length  of  0.06  in  the  present  case. 

Hopkinson  bar  tests  were  performed  on  contoured  Y-  and  Z-direction 
specimen  2-\"  long  by  3/V  in  dia-eter  both  in  tension  and  compression.  The 
samples  were  sandwiched  between  aluminum  loading  and  recording  bars  all  of  which 
featured  strain  gage  pairs  connected  to  eliminate  flexural  components.  A  bending 
suppressor  devised  by  Lewis'12'  was  employ.-  to  minimize  unwanted  flexural 
transients.  Pulses  were  produced  by  the  impact  of  diameter  cylindrical 
steel  projectiles  with  a  30°  conical  tip;  bullets  producing  compressive  failures 
had  a  shaft  length  of  2-j  in.,  while  those  inducing  tensile  fracture  had  a 
v  lndrical  section  only  1  in.  long.  Pulses  of  200  nicrosec  duration  with  a 
nearly  linear  rise  were  produced,  Involving  a  relatively  constant  strain  rate. 

The  test  analysis  was  performed  bised  on  the  hypotheses  of  one-dimensional 
stress  distribution,  neglect  of  lateral  inertia  and  shear,  small  elastic  strains, 
an  equivalent  cylinder  for  the  test  specimen  with  diameter  equal  to  that  at 
the  gage  section,  and  the  lack  of  effect  of  initial  compressive  wave  passage  on  the 
tensile  characteristics  of  the  sample.  The  dynamic  constants  obtained  fren  this 
series  of  tests  are  also  presented  in  Table  1.  Details  of  this  phase  of  the  work 
are  given  in  Appendix  D.  There,  Table  U  provides  a  comparison  of  the  values  of 
the  elastic  parameters  ^.....c,,  defined  by  Eqs.  (D-7)  obtained  here  and  in 
the  previous  investigation'*4'' 

The  presercc  of  an  initial  non-linear  range  of  the  stress-strain  curves 
followed  by  a  secondary,  nearly  linear  region  may  explain  the  anomaly  reported  in 
previous  tests  of  lower  values  of  "dynamic"  constants  than  those  of  corresponding 
static  parameters.  This  will  be  the  case  if  the  strain  level  for  the  forcer  is 
onsiderably  lower  than  for  the  latter.  The  rock  examined  does  not  conform  t.o 
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a  presently  accepted  three-dimensional  {  or  even  one -dimensional)  constitutive 
re-a»i°n.  Initial  elastic  constants  are  valid  only  for  small  strains;  tensile  and 
compressive  moduli  differ  both  statically  and  dynamically,  and  the  material  exhibits 
fir>t ’Cycle  effect*  The  rock  Is  not  completely  brittle,  but  exhibits  some  small 
time-dependent  plastic  or  viscous  regions,  and  hysteresis  accompanies  unloading 
from  any  stress  level  beyond  the  initial  domain.  Thus  the  material  must  currently 

be  characterized  by  a  set  of  experimental  data  rather  tha  .  by  an  analytical 
formulation. 
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COMPARISON  OF  STATIC  AND  DYNAMIC  ELASTIC  CONSTANTS 
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APPENDIX  A 


Section  I.  Introduction 


The  subject  treated  in  this  investigation  is  concerned  with  wave  propagation 
in  a  homogeneous,  transversely  isotropic,  linearly  elastic  half -space  produced 
by  a  normal  concentrated  time -dependent  load  applied  to  the  free  surface  of  the 
medium  which  contains  the  axis  of  elastic  symmetry.  This  problem  is  known  as 
Lamb's  problem  in  an  anisotropic  half -space  and  it  can  be  physically  modelled 
by  normal  impact  on  a  sufficiently  large  block  of  a  transversely  isotropic 
material  such  as  Yule  marble. 

Lamb's  problem  for  an  isotropic  elastic  half-space  has  been  investigated 
(l  2^4  5  6  7  8) 

extensively'  >»»»»»>/  and  -the  wave  processes  in  such  a  body  axe  by  now 

well  understood.  However,  relatively  few  results  have  been  obtained  relating 

to  wave  propagation  in  anisotropic  solids.  An  excellent  summary  of  this  topic 

(9) 

has  been  presented  by  Musgrave'  who  provided  not  only  a  classification  of 
anisotropic  media  in  terms  of  crystal  symmetry  but  also  discussed  general  features 
of  the  wave  propagation  in  anisotropic  substances  in  terms  of  three  characteristic 
surfaces,  that  is,  the  velocity,  slowness  and  wave  surface.  Lord  Kelvin 
first  introduced  these  surfaces  in  the  course  of  formulating  the  laws  of  dynamics 
in  elastic  anisotropic  media.  The  velocity  surface  is  formed  by  all  the  radius 
vectors  passing  through  a  source,  which  is  the  origin  of  the  space,  each  having  a 
length  proportional  to  the  phase  velocity  permissible  in  its  direction;  the 
slowness  surface  is  the  inverse  of  the  velocity  surface  with  respect  to  a  unit 
sphere,  and  the  wave  surface  represents  a  surface  of  equal  phase  of  waves  at  the 
time  t  =  1  that  started  at  the  origin  at  time  t  =  0,  i.e.,  it  is  the  shape  of  a 
wave  front  as  it  propagates  outward  from  a  point  source,  determined  at  the 
particular  time  t  =  1.  Musgrave  also  described  wave  processes  in  considerable 
detail  for  solids  with  specific  symmetry  such  as  hexagonal,  cubic  and  trigonal 


as  well  as  the  lattice  dynamics  of  crystals.  Comprehensive  references  up  to  1970 
may  be  found  in  this  volume. 


A-2 


Recently  Burridge^1^  executed  a  surface  wave  analysis  for  a  generally 

anisotropic  elastic  half -space.  He  demonstrated  that  if  a  surface  wave  can  exist 

in  any  particular  direction,  there  will  then  exist  a  fan  containing  this 

direction  along  any  one  of  whose  rays  such  waves  may  propagate.  This  result  was 

demonstrated  by  a  reducio  ad  absurdum  argument  which  shows  that  in  the  contrary 

case,  a  solution  may  be  constructed  to  the  equation  of  motion  which  is  inconsistent 

with  the  principle  of  conservation  of  energy.  This  conclusion  generalized  a 

result  by  Buchwald^^  and  corrected  a  suggestion  of  Synge that,  in  general, 

undamped  surface  waves  may  only  be  propagated  in  discrete  directions.  In  another 

(14) 

article  ,  Burridge  presented  a  solution  for  wave  propagation  in  a  generally 
anisotropic  half-space  due  to  a  line  source,  employing  a  Fourier-Laplace  transform 
and  a  Cagniard-de  Hoop  transformation^15’18’17*18  ^  that  facilitates  the  inversion 
of  the  transformed  function  into  the  real  time  domain.  It  was  shown  that  in 
spite  of  the  possibility  of  certain  branch  points  lying  in  a  complex  plane,  the 
Cagniard-de  Hoop  transformation  may  be  carried  out  irrespective  of  the  orientation 
°r  the  free  surface  or  type  of  anisotropy.  Numerical  results  of  the  surface 
waves  for  cubic  copper  were  obtained  in  the  form  of  theoretical  seismograms.  He 
also  derived  a  solution  to  Lamb's  problem  in  an  anisotropic  medium  by  integrating 

responses  of  line  sources  on  the  free  surface  over  the  unit  circle. 

(19  ) 

Buchwald  found  the  displacements  due  to  surface  waves  radiating  from 
a  given  harmonic  source  in  terns  of  double  Fourier  integrals  in  transversely 
isotropic  materials.  He  considered  both  the  quasi-isotropic  and  anisotropic 
cases,  which  correspond  to  the  axis  of  elastic  symmetry  of  the  medium  being 
normal  and  parallel  to  the  free  surface,  respectively;  the  slowness  curve  in  the 
quasi-isotropic  case  was  a  circle  and  the  wave  curve  a  concentric  circle.  The 
anisotropic  case  exhibited  more  complicated  behavior.  He  used  a  method  developed 
by  Lighthill^  tc  estimate  asymptotically  the  multidimensional  Fourier  integrals 


and  obtained  all  the  geometrical  properties  of  the  waves,  as  well  as  asymptotic 
expressions  for  the  wave  amplitudes  in  terms  of  the  distance  from  the  source. 

(21  22) 

Kraut'  *  '  investigated  a  plane  strain  problem  of  pulse  propagation 

resulting  from  a  surface  line  load  in  a  quasi -isotropic  medium,  a  much  simpler 
situation  than  for  the  truly  transversely  isotropic  case.  This  appeared  to  be  the 
first  attempt  of  utilizing  the  Cagniard-de  Hoop  transformation  in  the  solution  of 
wave  propagation  problem  in  an  anisotropic  half-space.  He  discussed  in  full  detail 
the  physical  significance  of  the  Cagniard-de  Hoop  transformation  in  conjunction 

with  the  slowness  and  wave  curves  of  the  solid. 

(23) 

Cameron  md  Eason  discussed  a  problem  involving  a  source  which  is  suddenly 

applied  at  a  point  on  the  axis  of  elastic  symmetry  of  an  infinite  transversely 

isotropic  elastic  solid.  They  obtained  numerical  values  of  the  displacements 

(2k) 

for  the  quasi-isotropic  case.  Ryan'  J  presented  a  solution  to  Lamb's  problem 
for  a  transversely  isotropic  half-space.  A  Heaviside  point  load  was  directed 
along  an  axis  of  material  symmetry  which  was  taken  as  normal  to  the  free  surface 
so  that  the  problem  reduced  to  the  quasi-isotropic  case.  Following  Kraut^21\  a 
Cagniard-de  Hoop  transformation  was  employed  which  yielded  a  single  finite  integral 
for  the  displacement  field,  that  was,  however,  evaluated  numerically  only  for 
points  on  the  surface.  Ricketts^ 25 ^  and  Ricketts  and  Goldsmith ^2^  have  attempted 
to  solve  the  problem  posed  in  this  thesis,  i.e.,  Lamb's  problem  for  a  transversely 
isotropic  half-space  with  the  axis  of  elastic  symmetry  located  in  the  free  surface. 
Although  they  did  not  obtain  a  solution  for  the  displacement  field  in  a  form 
amenable  for  a  numerical  evaluation,  the  problem  was  formulated  in  a  manner  permitting 
its  present  utilization  with  only  minor  changes.  Experimental  data  such  as 
group  velocity,  group  slowness  and  attenuation  characteristics  of  the  amplitude 
were  also  obtained  for  the  surface  waves  produced  by  the  normal  impact  of  a 
spherical  steel  ball  on  the  free  plane  of  the  half-space  modelled  by  a  large 
Yule  marble  block. 


Section  2.  Statement  and  Solution  of  the  Problem 


2.1  Statement  of  the  F:  'blem. 


The  problem  will  first  be  discussed  for  a  general  anisotropic  medium  and  then 
be  specialized  for  a  transversely  isotropic  substance. 

The  anisotropic  half-space  is  represented  by  a  0  artesian  coordinate  system 
(XpX^x^)  as  shown  in  Fig.  1  with  the  free  surface  defined  by  x^  =  0  and  the 
direction  of  positive  toward  the  interior.  Although  the  problem  is  formulated 
in  a  Cartesian  system,  cylindrical  and  spherical  coordinate  systems,  indicated 
by  (rj'SjX.)  and  (R,  6,cp),  respectively,  are  also  introduced  in  the  development 
of  the  final  solution.  The  anisotropic  elastic  half-space  is  assumed  to  be  homo¬ 
geneous  and  is  governed  by  the  generalized  Hooke's  law 


^ij^— ~  Cijk£  ek£  -  1,2,3)  (A2.1-1) 

and  the  linearly  elastic  strain-displacement  relation 

eid(x,t)  =i  (uij;)(x,t)  +Uj  (£,t))  (A2.1-2) 

Here,  x  is  the  position  vector,  t  is  time,  and  u,(x,t),  a.  .  (x,t)  and  e  .(x,t) 
are  the  Cartesian  components  of  the  displacement  vector,  and  the  stress  and  strain 
tensor,  respectively.  Also,  c.  is  the  fourth-order  tensor  of  the  elastic 
constants  that  satisfy  the  symmetry  relations 


CijkjJ  Cjik^  "  Cijj£k  Ck£ij 


(A2.1-3) 


if  a  strain  energy  exists.  Then  among  the  8l  quantities  in  c.  ,  only  21  are 

l  3 

independent  for  the  most  general  anisotropic  elastic  medium.  Throughout  the 

following  discussion,  the  usual  tensor  notation  and  summation  convention  on 

cpatia  variables  are  employe d.  A  comma  indicates  partial  differentiation  with  respect 
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to  the  subsequent  variable(s).  In  aii  elastic  medium  obeying  relations  (A2.1-1), 
(A2.1-2)  and  (A2.1-3),  the  displacement  equation  of  motion  in  the  absence  of  body 
forces  is  given  by 

\,a  <£•*> "  p  Xt&rt  (A2.i-i.) 

where  p  is  the  mass  density.  A  concentrated  load  with  an  arbitrary  time  history 
is  considered  to  be  applied  on  the  free  surface  at  x  =  0.  The  boundary  condition 
then  becomes 

ci2kl \l  =  '  (A2.1-5) 

on  x2  =  0,  where  eU^x^  is  the  two-dimensional  Dirac  delta  function  and 
f\(t)  are  the  components  of  the  arbitrary  force  with  F^t)  =  0  for  t  <  0.  The 
radiation  condition  at  infinity  is  also  invoked  so  that 

lira  [u  (x,t),u.  •  (x,t) ,etc. ]  =  0  .  (A2.1-6) 

Finally,  the  medium  is  assumed  to  be  at  rest  initially;  thus  the  initial  condition 
is  represented  by 

[ui(x,0),uijt(x,0)3  =  0  fort  $0  .  (A2,l-7) 

As  can  be  seen  from  the  boundary  condition  (A2.1-5),  the  force  applied  on 
the  boundary  need  not  be  confined  to  the  case  of  a  normal  impact  on  the  free 
surface  x^  =  0  since  it  can  exhibit  other  components  in  the  formulation  and 
in  the  formal  solution;  however,  numerical  results  have  been,  obtained  here  only 
for  the  case  of  normal  impact,  i.e.,  whenF^t)  =F^(t)  =0  ,  andF£(t)  /  0. 

The  problem  posed  above  may  be  solved  formally  in  exact  form  in  a  single 
finite  integral  by  using  a  Cagniard-de  Hoop  transformation^ ^ .  However,  in  view 
of  the  complexity  involved  in  the  computer  programming  for  the  case  of  general 
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enisotropy,  attention  is  here  restricted  to  a  transversely  Isotropic  half-space 
with  the  axis  of  elastic  symmetry,  chosen  as  the  x^-axis,  located  In  the  free 
surface.  The  symmetry  of  the  medium  permits  a  factorization  of  the  characteristic 
equation  of  the  system;  this  feature  saves  computing  time  in  the  numerical  evaluation 
of  field  quantities  from  the  formal  solution  obtained.  Moreover,  due  to  the 
choice  of  the  direction  of  the  applied  force  F  (t),  vnlch  Is  normal  to  the  free 
surface  that  contains  the  axis  of  clastic  symmetry  the  solution  is  obtained  for 
a  truly  transversely  Isotropic  medium  rather  than  for  the  quasi -isotropic 
case.  Out  of  21  elastic  constants  necessary  to  describe  the  properties  of  a 
general  anisotropic  medium,  only  five  independent  non-zero  values  are  required  for 
the  present  case.  Therefore,  the  stress -displacement  relations,  from  Eqs.  (A2.1-1) 
and  (A2. 1-2), arc  reduced  to 


°U  "  C11U1,1  4  C12U2,2  +  C13U3,3 
°22  *  C12U1,1  +  C11U2,2  *■  C13U3,3 
°33  "  c13ul,l  4  C13U2,2  4  C33U3,3 

(A2.1-8) 

°23  ■  cU14(m2,3  +  u3,2^ 

»13  ‘  cW.(ul,3  *  “3,1’ 

°1 2  '  *<C11  •  C12)(U1,2  *  “2,1> 

where  the  standard  contracted  notation  c^  with  M,N  ■  1,2,... 6  lias  been  employed 
instead  of  a  fourth-order  tnesor  representation  c  .  The  dlcplacecent 

equations  of  motion  'A2.1-1*)  reduce  to 


■J  Ul,ll  +  C2  Ul,22 


C3  ul,33  *  <rr"2)  u2,2i 


u  3,31 


l,tt 


(C1‘C2}  Ul,21 


*  c. 


U2,ll  4  C1  u2,22  4  °3  U2,33 


u3,32  "  **2,tt 
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U1,31  *  “2,32  *  c3  u3,ll  *  c3  u3»22  *  c5  u3,33  *  U3,u  (A2*1^ 


vherc  five  nev  independent  velocity  constants  have  been  defined  by 

C1  ’  cll/e  *  e2  *  ^ell"e12^/*  »  c3  "  cw/» 

CU  *  ^ei3  4  *  c5  •  «33/» 


(A?. 1-10) 


For  the  transversely  isotropic  medium,  the  boundary  conditions  (A2.1-5)  reduce 
to 


,  r  At.) 

•jWj  2  *  “2,1^  "  ■  ~i -  1  (V*  I* 

(C1  -  Jc2)ul,l  *  C1  “2,2  *  <el  •  '3>“3,3 

F,(t) 

c3(u3,2  *  u2,3> - p  t(xl>,3) 


f2(t) 


6(xa,x3) 


(A2.1-11) 


on  Xg  •  0. 


^•2  Forctal  Solution. 

In  vlev  of  the  initial  conditions  (A2.1-7),  the  boundary  conditions  (A2.1-11), 
and  the  radiation  condition  (AT. 1-6),  an  appropriate  method  of  solution  for  the 
systea  of  second  order,  linear  partial  differential  equations  (A2.1-9)  Roverning  the 
response  of  transversely  isotropic  media  is  represented  by  successive  employment  of 
the  Laplace  and  double  Fourier  transforms 

f’(s)  -  f  F(t)e’Ct  dt  ,  F(t)  -  ~  J  F*(a)eBtds  (A2.2-1) 


Br 


Ffoj.o-J  ■  JJ  F(xltx  )e 


dx^dx^ 


m2  p r-  ia(o1x1*o,xJ 

r<*l-*3>  ■^JJ>(«V<>3)*  3  doldc,3 


(A2.2-2) 
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vhere  s  Is  the  Laplace  transform  parameter,  Br  is  the  Bromwich  contour  in  the 
right -half  of  the  s-plane  and  1  »  /-l.  ar^  and  or.  are  real  Fourier  transform 
parameters,  and  a  scaling  factor  s  is  introduced  in  the  .  ct  (A.?. 2-2)  for 
convenience  in  later  computations.  F*  and  F  represent  Laplace  and  Fourier 
transformed  quantities  of  the  function  T,  respectively.  The  necessary  transform 
and  inversion  theorems  are  discussed  in  detail  in  Ref.  (28). 

Applying  these  transforms  to  (A.?. 1-9)  in  conjunction  with  initial  conditions 
A^  ,1-7)  »nd  the  radiation  eruditions  (A2.1-6),  the  system  of  ordinary  differential 
equations  in 


[crD‘  -  ■"(Cjcrj  ♦  c^a  ♦  T)}in  -(Cj-Cg) U0jDuC  -  .  0 

-(Cl-CgJiso^DUi  ♦  [CjD?  -  *  c3®^  4  0)  \  ■  0 

'  c*U®rS3  *  f*ap2  '  0?  4  Ce0*  *  U!  s  -  0 


(A2.2-3) 


ic  obtained  where  D  x  r~—  . 

dx? 

The  slallarlly  transformed  boundary  condltlot  of  (Ac. 1-11)  are  obtained  as 


Fi(i> 

c^fDu  -  iior  ii_ J  -  -  — - 

•  1  C  ft 


:1  "  ?c2)l3^ui  "  ciDu2  4  Ccu-e3)loc»au^  -  — 


%(■) 


c3(r^  -  isauj)  ■  - 


F3(s) 


which  are  ’'gain  a  system  of  ordinary  differentia:  q  it  Ur.  in  x  . 

« 

A  “:lutlc\  cf  Eqs.  (A?.  -3)  foi  u£  is  sough'.  :i  '.he  f  ns 


u^,  w  e"1**? 


(A2.2-4) 


(A2.2-5) 
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Substitution  of  (A2.2-5)  into  (A2.2-3)  leads  to  a  characteristic  equation  in 

2  '  (25)  ' 

X  in  the  partially  factored  form 


n(\,Q'ls£y3)  =  [c2X’  -  M][(ClX'  -  M)(c3X’  -  N)+  C^X']  =  o  (A2.2-6) 


where 


X'  =  (X2  -  a[)  , 

M  =  (c3a2  +  1)  ,  (A2.2-7) 

N  =  (Cj.o^  +  1)  . 

Eq.  (A2.2-6)  represents  the  slowness  surface  of  the  medium.  The  linear  factor 
in  X*  defines  a  separable  sheet  of  this  surface  associated  with  a  true  transverse 
mode  of  displacement,  while  the  quadratic  factor  in  X*  is  associated  with  coupled 
quasi -longitudinal  and  quasi-transverse  modes  of  displacements. 

The  bounded  solution  of  (A2.2-3)  satisfying  radiation  condition  (A2.1-6)  for 
large  x 2  is  found  to  be 


\  = 


3 

£ 

j=l 


V 


■SXJX2 


Re^)  >0 


(A2.2-8) 


where  Re  denotes  the  real  part  of  the  quantities  indicated,  and  the  X^  are 
defined  by 


=  M/c2  , 

rc  N  +  c  M  -  +  ((0^  +  c.M  -  c ?cr2)2-  Uc.cJW)®-. 

*2>3  *  L- - 2 -  2^ - 2 - ^ - °— ] 

Only  three  of  the  nine  are  independent  and  they  can  be  determined  from 
the  three  boundary  conditions  (A2.2-4)  on  xg  =  0.  In  terms  of  these  three 
independent  U^,  say,  U,^  =  R^,  the  solution  (A2.2-8)  may  be  expanded  as 
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“S  X-j  “S  —  s 

^  =  Kje,  1  2  +  R2e  -  2  ♦  E3e  ,  3  2 


-  ,1,  -shx2 
u2  ■  1  -q  V 


.  h  -sX2x2 

i  —  R„e 


<*1  2 


X,  -S  x,x 
i  —  R-e  *  * 

o/i  3 


C1^'M  R  e“SX2X2  +  Cj£l  R  e“SX3X2 


ul«2 

U  =  R 

3  k2 


c4ala3  3 


(A2.2-10) 


Upon  substitution  of  Eqs.  (A2.2-10)  in  the  boundary  conditions,  Eqs.  (A2.2-4), 
the  following  system  of  algebraic  equations  for  the  three  unknowns  R  is  obtained 

F*(s) 

-r -  Bi +  2^e2  +  2X3R3  - 

id,  F„(s) 

BlRl  +  B2R2  +  B3R3  =  7^ 

2  2  2  ?  X  or,  a-  F_(s) 

q?1q?3R1  +  Xl^2^  a3+B2^R2  +  X1  S^Q?3+b3'IK3  =  sc  ~ p  (A2.2-11) 

where  3^  =  2c2q^ 

Bj  =  ClXj  +  2c2“l  ■*‘CU"C3)b,-i’  j  =  2,3 
bj  =  (c^j  -  m)/c4  ;  J  =  2,3 

and  the  X'  and  M  are  defined  by  Eq.(A2.2-7).  Solving  the  system  (A2.2-11)  and 
rearranging  the  result,  R^  may  be  put  in  the  matrix  form 


%  =  DiJFJ  (A2.2-12) 

where 

Dll  =  ^  VlV^V1 

BJ2  =  ia]_C2X1X2X3(a,3  +  bg)-  2X1\2X3(a2  +  b^)] 
h  ai  a-i 

D13  =  -7T  {2X2B3  '  2X3E2} 

D21  =  Tz  ^B3ala-5  "  Bi\lx3^3  ~  b3^ 

°22  =  iai^xi  +  o^)lR(a2  +  b,)-  2X^ff  o2"1 
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D  -hSS 

23 


X?  +  2 


3  t2¥l  -  B3  “4^) 

t  ^ 

D31 '  k  tBiW4 +  b2>  -  \yfy 


D32  iaiC2X2Q,iQf3  "  X,(«2  +  t>2)(x2  +  o^)} 

B„  -  2B,  Xg} 


D  -  XlQfl{>3  r  X1  +  °i 

33  c3  <•  x1  “2  -"l 


1  F1(S)  „  1  F2(s)  _  l  ^o(s) 


Fir  „  io  •  rT2"  p  T-  >  V  %  ~D 


(A2.2-13) 

(A2.2-14) 


with  the  determinant  of  the  coefficients  of  in  Eqs.  (A2.2-11)  given  by 

2X2  2X3 


D  = 
o 


,2  2 
*l+0i 


B 


2  2 
“l“3 


XlMQf3+b2^ 


XlX3(a3+V 


(A2.2-15) 


Upon  substituting  Eq.  (A2.2-12)  into  the  system  (A2.2-10),  the  displacement 
field  in  transformed  space  can  be  expressed  in  a  matrix  form  as 


V“l,a3,s’V 

f  V 

2^al,Qf3’S5x2) 

^(a^.spc,,) 


_  1 
s 


R, 


.  al 

■1^RL 


*2 

■i  —  R 


“1  2 


Ci^R  ^  n 

ci.a,a,  2  c,ia,a„  3 


B3 

X3 

■i  -i  R_ 

°i  3 

c,  Xi-M 


'Uaia3 


rsxix2 


e-sX2x2 


e-sX3x2 


(A2.2-16) 


The  writing  of  the  u±  in  this  fashion  reflects  the  fact  that  they  can  be  represented 
in  terms  of  the  sums  of  contributions  from  different  components  of  the  input 
force  F^t).  As  an  example,  the  first  column  of  D.  will  comprise  the 
contributions  to  u^  arising  from  the  x^component  F*(s)  of  the  force  F^t), 
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Similarly  and  will  comprise  the  contributions  to  fros  F*(s)  and 
F^(n),  respectively. 

After  obtaining  the  Laploce-Fouricr  transformed  „oli  •  l  n  u*  tt  apj  ilcatlon 
of  the  Fourier  inversion  formula  given  by  expression  (A2.2-2)  yields  the  Ixiplace- 
transformed  displacement  as 

OD 

ui(5»s)  •  jAy  JJ  vij(«i.«3)  Qj(of1,or^»;x)dof1dof:  (A2.2-17) 


where  is  the  square  matrix  of  the  right-hand  term  in  Eq.  (A2.2-16)  and 


S. 


^[l(n-ix1  *  oy^)-  XjX  J 

s[i(or1x  *  or,x  )-  >^x  ,] 
Qp  «  c  11  33 

a[i(ofix1  ♦  o3x3)-  X3x2J 


(A2.2-18) 


The  integrals  in  (A2.2-17)  converge  because  Fc(Xj)  >0.  It  If  still  necessary  to 
invert  the  Laplace -transformed  solutim  into  the  i-al  time  domain.  It  is  sufficient 
f«r  *ho  following  calculations  to  assume  that  the  aj"Jaee  transf  rta  parameter  Is 
rea  and  positive.  Then,  Lerch's  theorem'"  ^  guarantees  the  existence  and 
uniqueness  of  u^x.t). 


2.3  Transformation  of  the  Formal  Sol^lon. 

Eq.  (A2.2-17)  together  with  Eqo.  (A2.2-13)  an  !  (A2.^-15 )  comprise  the 
Laplace-transformed  displacement  under  arbltrar;  impact  1  ad;  however,  its  form 
is  not  con/mient  for  inversion.  By  a  sequence  of  transformations  and 
contour  integrations,  the  integrals  appearing  In  F.qs.  (AP.  -17)  will  be  converted 
in  o  a  fc.rn  that  allows  the  inversion  of  the  Lapin  ’c- transformed  solution  by 
inspection.  In  t his  way,  the  exact  Inversion  of  each  u*  wi  11  he  acconplished 

%J 

M  tlie  of  a  cinglc  finite  integral  and  i  igabmlc  ex;  Msidhft  that  are  suitable 
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for  numerical  evaluation.  For  these  purposes,  two  transformations  are  executed 
on  the  variables  (x^,x^)  and  (or^ar^)* 

Firit,  a  plane  polar  coordinate  system  on  the  free  surface  of  the  half-space 
is  introduced,  given  by 

x^  ■  r  cos  0  ,  x,^  ■  r  sin  0 

(0  <  r  <  •  ,  0  5  *§  <  2n)  .  (A2.3-1) 

Also,  let 

or^  ■  uj  cos  0  ,  o^  ■  a)  sin  0 

(—<«><•  ,  -  f  <  0  <  §)  (A2.3-2) 

and  let  ou  ■  -ip  so  that  do^da.  ■  -pdpd0  ,  considering  now  p  as  a  complex 
variable.  Then,  from  the  above  transformations, 

is ( Qr^x^  ♦  or,x3)  ■  spr  cos(0  -  0)  (A2.3-3) 

so  that  Qj  in  Eq.  (2,2-18)  becomes 

s[pr  cos(0  -  0)-  \.x_) 

Q.(r,0,xo;p,0,s)  .  c  0  *  (A2.3-U) 

Using  the  above  result,  the  Laplace -transformed  displacement  (A2.2-17)  may  now 
be  written  as 

T1 

u*(x,s)  -  .  J^d0j  vJj(p,0)Qj(r,0,x2;p,©,s)dp  (A2.3-5) 

^  H  ^  »• 

2 

where  V^tp,©)  is  defined  by  substitution  of  Eq.  (2.3-2)  in  vij  • 
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2.4  The  Cagniard-de  Hoop  Transformation  and  Inversion  of  the  Laplace- 
Transformed  Displacements. 


As  indicated  earlier,  inversion  of  the  Laplace-t ran s form  will  be  accomplished 

by  inspection  of  the  solution  after  first  performing  another  transformation  that 

will  be  discussed  here.  This  procedure  essentially  involves  the  rewriting  of 

Eq.  (A2.3-5)  in  a  form  that  yields  the  Laplace  transform  of  V. .  by 

•  iJ 

J  e"8tVlj(x,t;p,e,j)dt  =  u*(x,s)  .  (A2.4-1) 

o 

A3  can  be  seen  from  Eq.  (A2.2-1),  which  defines  the  Laplace  transform  pair, 
this  is  formally  accomplished  by  three  pairs  of  conformal  transformations 


Re [pr  cos(e-6)+  XjX2]  =  t  , 

Imrpr  cos(e-0)+  XjXg]  =  0  ,  (j  =  1,2,3)  (A2.4-2) 

where  t  is  positive  and  real.  The  above  equations  define  the  Cagniard-de  Hoop 
transformation  which  is  utilized  in  a  contour  integration  to  obtain  the  inversion 
of  the  Laplace  transformed  solution. 

Substitution  of  the  expression  for  X 1  from  Eq.  (A2.2-9)  into  Eq.  (A2.4-2) 
yields  the  Cagniard-de  Hoop  path  for  X1  in  explicit  form  as 

c  2 

p‘  {cos*  <p  cos‘-(  &-0)  +  (cos2e  +  sin20)sin  cp]-p.{2T  cos®  cos(*&-0)V{t2-  -■-— *£)  =  0 

1  c2  1  c2 

(A2.4-3) 

Similarly,  the  Cagniard-de  Hoop  paths  for  Xo  ,  are  obtained  from  the  expression 

f  J 


r2,3 +  +  b(t,‘?,®,©)p^  +  c(T,e,®,9)p2j3  +  eu,'*,®,©)  =  o  (A2.4-4) 

Here,  a  transformation  for  the  space  variables  was  introduced,  given  by 


2  °  -  -1  X2 
n  -  (r  +  x‘  ,  c  *  tan  —  , 

(0  <  R  <  co  ,  -  J  <  <3  <  f) 
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and 

where 


2  *3  q  ^ 

^  =  “  2  ^2t  cos  9  cos  (&*0)  +  t  P  cos  cp  cos  ( 0-  ©)sin2cp]  , 

B  =  z  cos  9  cos  (9-0)+  t  P  sin2cp  -  sin2cp  cos2cp  cos2(0-©)e  -  sin\p  J]  , 


2  3  ^ 

c  =  "  z  ^2t  cos  'P  cos(&-0)-  t  cos  cp  sin2cp  cos(&.0)e1]  , 

P  1  r  ^  2.2  .4  , 

b  =  2  Lt  -  t  sin  cp  e1  +  sin  cp  h^J  , 

Z  =  cos  0  +  (2-m  )sin20  cos2©  +  — ^  sin^0  , 

1  c.  ’ 

2  2  1 
J  =  ex  cos  0  +  f  sin  ©  , 


P  =  2  - 


sin  0  , 


V  hl(2clc3  -  clc5  -  °3  *  '*>  • 

ei=  hl(Cl  +  C^)  I 

fl=  V°3  +  c5^  5 
gl=  Mcl  "  c5^  » 
hl  =  1/(c1c3)  . 


(A2.4-5) 


Eq.  (A2.U-3)  is  quadratic  in  p  with  real  coefficients  which  can  be  easily  solved 
and  will  yield  either  two  real  or  a  pair  of  complex  conjugate  roots.  Eq.  (A2.4-4) 
is  quartic  in  p  with  real  coefficients  and  will  yield  4  real,  or  2  real  and  one 
pair  of  complex  conjugate  or  2  pairs  of  complex  conjugate  roots.  These  will  be 
found  numerically  as  discussed  in  the  sequel. 

Following  Kraut ^  ^  for  the  construction  of  the  Riemann  surfaces  of  p  to 

establish  the  analyticity  of  Xj  =  Xj(p)  and  introducing  the  Cagniard-de  Hoop 

transformation  discussed  above,  the  Laplace  transformed  displacement,  Eq.  (A2.3-5), 
can  be  written  as 
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^(XjS)  = 


dp, 


2tt 


h  f  de  f  ■,  =  vy(p3’e)p3  ~3t  e'Stdt  <j=1>2'3)  (A2'l,-6> 

TT  TT  t  J-l 


where  t,  are  the  arrival  times  of  the  body  wave  fronts  given  by  the  double  points 
J 

of  the  paths.  This  relation  is  written  in  the  desired  form  for  an  inversion 
of  the  Laplace  traj  =  form  and  inspection  yields  immediately  the  solution  in  the 
time  domain  as 

JI  t  3  dp . 

U  (x,t)  =  -  -Vf  de  J  Re[  E  v  (t,f,p,e)p  -lldt'HCt-tj)  (A2.U-7) 

2tt  R  Jtt  t4  j=l 

"2 


J 


Here  p,,  is  that  function  of  t  and  x  defined  in  Eqs.  (A2.4-3)  and  (A2.4-4),  and 

i 


V 


11 


=  D^p.ejfjF^t-f)  +  D10F9(t-f)  +  D^^t-t')  , 


12  2' 


13  3' 


v12  =  D2/i(t-t’)  +  D22^^t_t,)  +  D23^3^t-t,)  ’ 
v13  -  D31fl<t-t')  +  V2(t-t’)  +  D3/3(t-t')  ’ 


ia. 


21 


— i  V  ,  V 

X  11  ’  22 


1  «L  12  ’ 


V, 


23 


iax  V13  ’  V31  "  °  ’ 


c^-M 


V, 


32 


V. 


c4ala3  12 


c  Xl-M 

v  =  -=-*! — V 

33  c4aia3  13 


(A2.4-8) 


where  the  superposed  dot  represents  differentiation  with  respect  to  time. 

A  fundamental  solution  is  defined  as  the  displacement  field  of  the  solid 
due  to  a  Heaviside  point  load  H(t).  Eq.  (A2.4-7)  can  be  then  used  to  obtain 


the  fundamental  solution  as  follows 

TT 

H/  .  N  1 

u 


»(x,t)  {Bet  I  v»  p.  3i]) 

2tt  R  TT  J=1 


(A2.4-9) 


where 
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^1 =  Dn^»e)  +  D12te>e)  +  D13(p»e)  , 

vj2  =  D21^P»9^  +  D  2^P>6^  +  D23(p»6)  > 

vJb  =  p31(p»e)  +  d32(p,g)  +  D33(p,e)  , 

and  similar  expressions  for  vJJj  and  are  obtained  from  Eqs.  (A2.4-8)  upon 
replacing  by  for  i  =  2,3  and  i  =  1,2,3.  When  F  (t)  is  replaced  by  the 
Dirac  delta  function  6(t),  then  Green's  function  for  the  system  is  obtained  as 

3  dp 

ul(-,t)  =  '  V®  £*  Eet3S!  ^3  pd  Tt11  H(t’V  (A2.4-10) 

"2 

It  is  to  be  noticed  that  since  Green's  function,  Eq.  (A2.4-10),  involves  a  time 
^ifferentiation  which  generally  yields  poor  results  in  numerical  procedures, 

Eq.  (A2.4-9)  constitutes  a  better  representation  for  the  numerical  evaluation 
of  field  quantities. 

2.r  Displacement  due  to  a  Normal  Impact  Force  on  the  Free  Surface. 

Since  considerable  effort  and  expense  are  involved  in  a  numerical  evaluation 
of  the  field  quantities  such  as  displacements  and  stresses,  only  responses  due  to 
a  normal  force  will  be  considered.  Thus  taking  F2(t)  =  F  (t)  =0  in  the  above 
formulations,  a  solution  is  obtained  for  the  case  of  normal  impact.  This  problem, 
which  is  Lamb's  problem  for  a  transversely  isotropic  medium,  is  considerably 
simpler  than  that  for  an  arbitrarily  directed  input  force.  Furthermore,  such  a 
numerical  evaluation  was  compared  with  corresponding  results  for  an  isotropic 
medium  and  also  with  data  that  was  obtained  from  laboratory  experiments  on  a 
suitable  model.  If  F2(t)  is  chosen  as  F(t)  and  F^t)  =  F^t)  =  0  in  Eq.  (A2.1-11), 
the  boundary  conditions  become 
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Ul,2  +  U2,l  "  0 


(V2o2>u1,1  +  clu2,2  +  (VC3)U3,3  “  '  ^  6(x1-x3) 


U3,2  +  U2,3  *  ° 


(A2.5-1) 


on  x2  =  0. 


Thus,  all  terns  in  Eq.  (A2.U-7)  which  are  multiplied  by  either  F^t)  or  F3(t) 
must  vanish.  The  displacement  for  the  normal  impact  force  is  obtained  as 


ii  £  2  ,jp 

u  (x,t)  =  -  j52  de{J  F  (t-t '  )He [  s  W  (x,t,t';p,e)p  -^-]dt '  }H(t-t  ) 


where 


d  J  ’■J  '  '  L  JJt j  JVA  U  u  -  u  , 

2tt  pR  _n  Jt  J»1  <3  dT  J 


Wlj  "  J  =  lj2>3 


w21  =  O-  *1  >  W2J  -  * 1  AJ  il  ■  2.3 

1  0„  U 


(A2.5-2) 


where 


w31  =  0 


’  w33  -  Zj£-  k3  •  3  =  2’3  > 

15  N 


-  2x^\2X2(^2  “  ^2^  ’ 

Aj  =  +  b3)+  2c^b  J  , 

A3  =  -  XgtyCol  +  b2)+  2cyjb2] 
bj  =  (c^j  -  M)/cu  ,  d  =  2,3 


B1  =  2C2al  ’ 


Bj  =  ClXj  +  2G2al  '  (Vc3)bj  ’  J  =  2’3 


(A2.5-3) 


Do  =  A1B1  +  A2B2  +  A3B3 
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Xj,  Xj  ana  M  are  defined  In  Eqs.  (A2.2-7)  and  (A2.2-9).  The  subscript  n 

is  used  to  represent  the  fact  that  quantities  discussed  here  are  derived  for  a 

normal  impact  force.  Pj  are  again  given  by  Eqs.  (A2.4-3)  and  (A2.1..1,)  since 

these  are  related  only  to  the  characteristic  equation  of  the  medium  considered. 

The  fundamental  solution  similar  to  Eq.  (A2.4-9)  for  this  case  can  be  written 
as 

3  dp. 


UlN(it)  =  '  sjqE  ^deRetjeI:1  VS'tiS’e>*J  %«<t-V 

"2 


(A2.5-4) 


for  F(t)  H(t)  and  the  Green's  function  corresponding  to  Eq.  (A2.4-10)  is 

\(2*t)  "  '  f d0  6)Pj  -ji]}  H(t-tj )  (A2.5-5) 

“2 

for  F(t)  =  6(t). 

The  integrand  of  Eq.  (A2.5-U)  is  similar  to  that  of  the  line  source  problem 


obtained  by  Kraut ^21^, 


It  can  be  considered  as  the  sum  of  responses  generated 


by  a  continuous  spectrum  of  line  sources  spread  angularly  on  the  free  surface 
through  the  impact  point 

2*6  The  Rayleigh  Wave. 

As  the  normal  distance  from  the  plane  boundary  into  the  medium  goes  to  aero, 
Eq.  (A2. 4-2)  becomes 

5r  °0S(?  '  e)  -  ‘  (A2.6-1) 

so  that  the  Cagniard.de  Hoop  path  runs  along  the  real  axis  of  the  right-hand  half 

of  the  complex  p-plane.  The  presence  of  a  simple  pole  PR  on  the  real  axis, 
too™  as  the  Rayleigh  pole'11-12-1?),  requires  m  lndentatlon  of  t„e  path  of 

integration  to  avoid  this  singularity.  Thus,  when  x.,  0,  the  points  on  a  small 
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semi-circular  indentation  about  the  pole  no  longer  correspond  to  real  time. 
Therefore,  the  contribution  to  the  time-trnns formed  displacement  field  arising 
from  the  semi-circular  indentation  must  be  evaluated  separately,  *hcn  inverted 
into  the  time  domain  and  added  to  the  displacement  field  arising  from  integration 
along  the  Cagniard-de  Hocrp  path.  As  an  example,  when  F  •)  •  H(t)  the  contribution 


from  the  Rayleigh  pole  is  given  by 

n 


u*H  (xi»°*5S»fO  -  ~y~  f  d0{(ni)*  Res(  Z  Wi^(r,  e;p,  0)',”8pr 


cos 


(6*0) 


) 


Rpole 


2n  p  % 
2 


J-l 


P*P 


(A2.6-2) 


in  the  transformed  space  where  Res  denotes  residue  of  the  indicated  quantities 
at  the  given  location  of  p.  Inversion  to  real  time  yields 


__  ^  1 

where  tr  »  pRcoc(0-0Q)  and  0Q  ■  0  -  cos’  (~)  ,  ~he  factor  p^ln^©-^)  is 

F 

introduced  in  Eq.  (A2.6-3)  since  the  Dirac  delta  function  involved  is  an 
implicit  function  of  The  displacement  flelu  at  a  station  on  the  fr 

surface  due  to  a  unit  normal  impact  force  H(t)  is  thus 


H(t-td) 


u.  (XpO,x_,t)  «  u.  (x  ,0,x  ,t)  ♦  p  _  ln{Res  Z  ,(  r,  05T.»  ^  ]1 

rJcurface  3  1  2npr  -1  H  |pR«ln(e-%)| 


(A2.6-<0 


where  the  first  tern  on  the  right-hand  side  rcpr<  contributions  due  to  body 

wave  disturbances  while  the  second  tens  arises  fr  a  the  Rayleigh  pole. 
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Section  3*  Kumcrical  Procedure* 

3.1  Introduction. 

Displacement  field*  *uch  m  given  by  Eq.  (A2.U-7)  obtained  In  the  prevlou*  chap¬ 
ter  are  generally  expressed  In  teres  of  eoceplleated  algebraic  function*  of  x,p  and  t 
and  are  Intractable  analytically.  Therefore,  the  fundamental  solution,  Eq.  (A 2.5-U) 
the  displacement  field  of  the  Bediue  under  a  Heaviside  noreal  Impact,  has  been 
programed  for  evaluation  by  a  digital  cocputcr.  The  Green's  function  (A2.5-5) 
say  also  be  used  for  such  an  evaluation  that  vlll  exhibit  the  basic  character 
of  the  response  of  the  cedlun;  however,  It  Involves  the  tlsse  differentiation 
Indicated  In  Eq.  (A2.5-5)  which  oust  be  earrled  out  numerically;  as  a 
consequence,  this  procedure  often  lead*  to  unsat Is factory  results. 

In  most  practical  problems,  physical  Input  forces  are  not  realized  in  a 
Dirac  delta  function  fora  and  the  desired  solution  is  a  cost  In  at  Ion  of  several 
fuirtlons  of  which  the  Green's  function  Is  only  one.  For  an  example,  If  F(t) 

a  tl 

Is  the  actual  Input  force  of  the  problem  and  [u,  (x,t)J  i*  the  Green's 

*  N  “ 

function  fro*  Eqs.  (A2.5-M  and  (A2.5-5)»  the  displacement  field  due  to  F(t) 

Is  then 

u.(x,t)  -  r<t)0  (x , t )  ]  -  u«  (x , t )  ®F(t)  (A3. 1-1) 

1  -  &  “  ln 

where  the  symbol  <1  denotes  a  convolution  product  in  time.  Eq.  (A3. 1-1)  1* 

Identical  to  Eq.  (A2.5-2).  Thus,  the  fundamental  solution,  Eq.  (A2.5-*0>  can 
be  used  for  evaluation  to  avoid  the  numerical  differentiation  Involved  ln  the 
Green's  function,  fq.  (A2.5-5).  Kumerical  differentiation  of  the  input  function 
Is  needed  ln  this  case;  however,  this  operation  1*  slcpler  and  generally  yields 
core  accurate  results  than  that  Indicated  above. 
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3.?  Compute r  Program. 

The  caeputcr  program  developed  calculates  l)  the  fundamental  displacement 

field  given  by  Eq.  (AP.'j-k),  11)  the  components  f  ’he  t^Joseuta.  strnln  and 

stress,  HI)  the  actual  displacements ,  strains  and  stresses  obtained  by  the 

convolution  Integral,  Eq.  (A3. 1-1)  for  a  given  Input  f(t). 

In  order  to  compute  the  fundamental  displacement,  1**  subroutines  arc 

used  of  which  two  arc  very  Important.  One  of  these  Is  a  routine  which  finds 

roots  of  the  quartlc  algebraic  equation  (A2.U-U).  This  routine  uses  Balrstow's 
(3I1) 

scheae'  which  is  general  enough  to  solve  any  ever  degree  algebraic  equation 
so  that  this  routine  say  be  used  to  find  roots  of  the  sext  ie  equation  arising 
n  the  form  of  the  characteristic  equation  of  a  generally  anisotropic  ocdlxsa. 

The  sethod  provides  a  corresponding  number  of  quadratic  factors  of  the  given 
even  degree  polynomial  bj  an  Iteration  scheme.  Fas*  and  aeeur«*e  convergence 
requires  a  quite  good  ir.lt  la  approximation  and  this  Is  obtained  easily  from  a 
*  f  w  ^  error  te  'hnlques.  Another  routin'  of  importance  computes  the 
■ iCX  quantities  in  Eq.  (A2.*>-M,  These  two  routines  take  most  of  the 
computer  time  necessary  to  solve  the  problea, 

3.3  EesuHs. 

Several  cctr  of  nunerical  results  which  arc  eotisldered  to  be  representative 
of  *he  solution  obtained  are  shewn  in  the  following. 

1/  Three  components  of  the  fundamental  displacement  s  at  various  locations 
are  shown  In  Figs.  2,  3  and  b. 

11 '  Thej?e  displacements  convolved  with 

U)  vi  Input  force  given  by  Fvt)  -  slr."(^*;),  where  /  Is  the  duration 

¥ 

of  the  input  pil  e  arc  .»  vn  in  Flgi.  ,  u,  7  ar.d  8,  and 
xb)  th  stresses  p.  duced  by  the  input  force  obscr/ed  from  experiments  are 
shown  in  Figs..,  ,  3*  **  of  the  mai  repor’  and  Appendix  C. 

.11'  slowness  and  wave  curves  are  show,  in  Figs.  9,  10,  11,  12  and  13. 


A-23 


Section  4.  Discussion  and  Conclusions 

4 . 1  Introduction . 


It  appears  that  the  solution  presented  here  is  the  first  available  for 
Lomt'a  problem  In  three  dimensions  Involving  a  truly  transversely  isotropic  medium. 
A  three-dimensional  formulation  is  Introduced  in  the  course  of  the  solution  and 
the  problem  is  solved  using  a  modified  Cagniard  method.  This  procedure  may  be 
used  to  solve  the  same  type  of  problem  formally  for  any  anisotropic,  elastic 
medium  even  though  it  may  take  a  substantial  amount  of  computer  time  for  evaluation. 
P-'rrldge  suggested  essentially  the  same  form  of  the  solution  to  Lamb’s  problem 
as  presented  here  in  three  dimensions  for  a  generally  anisotropic  medium;  however, 
he  use d  a  two-dimensional  result  to  construct  the  solution  for  the  three-dimen¬ 
sional  space  and  he  presented  only  numerical  results  for  two-dimensional  solutions 
on  the  free  surface  for  a  cubic  costal.  Ricketts'25)  presented  a  formal  solution 
for  the  same  problem  investigated  here  but  he  was  not  able  to  obtain  any 

numerical  results  since  the  solution  he  suggested  includes  an  integral  operation 
whose  limit  is,  in  general,  not  finite. 


Since  the  solution  obtained  here  is  in  the  form  of  quadratures,  it  must  be 
evaluated  numerically.  However,  the  evaluation  of  Eq.  (A2.b-7)  for  cases  other 
than  a  normal  impact  is  beyond  the  scope  of  the  present  study.  Numerical  results 
for  the  responses  of  the  solid  due  to  a  pure  shear  load  might  be  of  interest  to 
geophysicists  in  relation  to  earthquake  phenomena;  these  could  be  obtained  with 
a  certain  modification  of  the  program  developed  here. 

*• 2  S.?T»rls°n  of  Analytical  Results  for  Body  Waves  in  an  Isotropic  Med;, a. 


one  type  of  investigation  to  check  the  validity  of  the  numerical  results  was 
carried  out  by  faring  the  present  fUnd.ment.1  solution  to  corresponding  values 
obtained  by  Rekerl.  and  Llpson<*>  and  Shlbqya  and  *akahara<*>  for  the  isotropic 


half -space.  To  carry  out  such  an  analysis,  it  should  be  recalled  that  the  solution 
and  the  computer  program  developed  in  this  investigation  apply  to  a  transversely 
isotropic  solid  which  exhibits  three  distinct  sheets  of  the  slowness  surface 
except  for  a  finite  number  of  singular  points,  which  are  "the  branch  points  in  the 
complex  p-plane.  Thus,  it  was  not  possible  to  use  the  program  to  obtain  responses 
for  a  truly  isotropic  solid  in  which  two  sheets  of  the  slowness  surface  corresponding 
to  shear  waves  coalesce,  resulting  in  a  singular  surface.  Instead,  a  set  of 
elastic  constants  for  a  slightly  transversely  isotropic  solid  derived  from  a 
set  of  elastic  constants  for  an  isotropic  solid  was  employed  in  the  computational 
routine.  A  case  where  p  =  ^  was  selected  so  that  X  =  G  with  X  and  G  as  the  Lam^ 
constants  and  p  as  Poisson's  ratio.  Velocity  constants  c1  and  c^  defined  in 
Eq.  (A2.1-9)  were  obtained  from  the  relations 


=  G/p  (a4. 1-1) 

while  c^j  c^  and  c^_  were  chosen  by  means  of  small  perturbations  involving  c^ 

and  c^  to  realize  slight  anisotropy.  In  the  computations,  a  2  percent  transverse  , 

anisotropy  was  employed  using  the  values 

c5  =  cx(l  -  .02)  , 
c2  =  c3(l  -  .02)  , 

c4  =  (crc3)(l  -  .02)  .  (A4.1-2) 

The  slowness  curves  resulting  from  the  above  constants  using  X  =  G  =  2.0  x  10  psi  and 
p  -  2.0  x  10" 4  are  shown  in  Fig.  12  ,  which  indicate  the  presence  of  anisotropy 
so  that  the  present  computer  program  can  be  used.  As  shown  in  Fig.  14,  the  results 
from  the  present  investigation  fall  between  those  of  References  (4)  and  (31).  Since 
Pekeris  and  Lipson  obtained  an  exact  solution  in  terms  of  elementary  functions, 
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it  appears  that  the  present  investigation  does  yield  a  better  approximation  than 

that  of  Shibuya  and  i'lakahara  who  obtained  their  solution  by  a  direct  numerical 

inversion  of  the  Laplace-transformed  problem.  It  should  be  noted  that  the 

response  in  the  interior  of  an  isotropic  half-space  obtained  from  the  solution  of 

Pekeri^  and  Lipson  were  determined  here  from  those  responses  on  the  surface  due  to  a 

buried  point  source  (given  in  Ref.  (4))  by  use  of  a  dynamical  reciprocal  theorem^^. 

The  only  analytical  results  pertaining  to  the  fundamental  stress,  even  for 

an  isotropic  solid,  are  to  be  found  in  Shibuya  and  Nakahara's  paper.  Using  the 

elastic  constants  cited  above  for  the  nearly  isotropic  solid,  normal  conponents 

of  the  fundamental  stress,  ^22^— were  computed  and  plotted  together  with  the 

data  of  Ref.  (31)  in  Fig.  1, 5.  Although  the  agreement  is  reasonable,  the  results 

from  the  present  investigation  appear  to  provide  a  more  realistic  solution  for 

the  earlier  part  of  the  pulse.  This  is  so  because  u„(x,t)  displays  a  virtual 

H 

discontinuity  at  t  =  1  in  Fig.  15  and  o£_ (x,t)  is  proportional  to  r—  so  that 

c.(L  *■"  oXg 

the  fundamental  stress  must  be  nearly  like  a  Dirac  delta  function. 

4.3  Comparison  of  the  Analytical  Results  with  the  Finite  Element  Method 
and  Experimental  Data. 

The  convolution  integral  indicated  in  Eq.  (A2.5-2)  has  been  evaluated  to 
obtain  the  actual  stresses  resulting  from  a  realistic  input  force  F(t).  The 
values  obtained  have  been  compared  both  with  the  results  obtained  from  the  finite 
element  technique  and  with  experimental  data. 

The  experiments  utilized  a  limestone  block  to  model  an  isotropic  half -space 
and  a  Yule  marble  block  for  a  transversely  isotropic  semi-infinite  solid.  Details 
of  the  experimental  investigation  are  presented  in  Ref.  (32),  which  also  includes 
the  procedure  of  determining  the  dynamic  elastic  constants  of  Yule  marble  utilized 
in  the  computation.  The  constants  were  obtained  from  the  body  and  surface  wave 


measurements  on  the  two  blocks  used  In  the  experimental  work.  The  static  constants 

(25) 

determined  by  Ricketts4  were  based  on  data  from  a  small  specimen  cut  from  one 
of  the  corners  of  one  of  the  Yule  marble  blocks.  The  elastic  constants  for 
limestone  were  also  token  from  the  data  Ricketts  obtained.  These  three  sets 
of  constants  are  listed  in  Table  1. 

Experimental  and/or  analytical  difficulties  that  could  account  for  the 
disagreement  between  predicted  and  measured  values  (when  extant)  include 

(i)  Discrepencies  in  the  properties  of  the  actual  blocks  and  those  assumed 
in  the  mathematical  model.  The  rock  samples  employed  exhibited  local 
differences  in  properties  and  inhooorenletics  and  evidenced  deviations 
from  elastic  behavior.  The  Yule  marble  manifested  some  email  changes 
in  the  direction  of  the  axic  of  elastic  symmetry  within  the  block. 

(ii)  Errors  in  experimental  measurements  involved  in  determining  the  elastic 
constants  and  the  axis  of  elastic  symmetry. 

(iii)  Experimental  errors  involved  in  the  stress  measurements  which  are 
discussed  in  Ref.  (32), 

(iv)  Numerical  errors  ir.  the  computation  of  the  field  quantities  due  to 
round-off  or  truncations  built  into  various  library  routines  used. 

(v)  The  distributional  character  of  the  solution  which  requires  integration 
over  ?tt  radians  introducing  a  numerical  approximation  that  Involves  an 
error  of  order  (ah)^  for  approximate  quadrature  based  on  Simpson's  rule, 

Ah  being  the  integration  step. 

(vi)  Approximations  involved  in  numerical  differentiation  of  the  input  data 
that  brings  ir  an  error  of  order  of  (fih)  for  a  f  rvard  difference  scheme. 

(vii)  The  difference  in  the  finite  area  of  application  of  the  actual  load  and 
the  point  load  arsuned  as  the  input  in  the  anaivsis;  the  latter  introduces 
c.  significant  contribution  to  th.*  responses  fr.s.  the  higher  components  of 
the  frequency  spectrum  of  the  Di-ac-delta  function  input. 


A-27 


Some  representative  eoeparisons  among  the  three  types  of  results  are  shown 
in  Appendix  C.  The  agreement  generally  appears  to  be  quite  good.  However,  the 
analytical  solution  obtained  nearer  to  the  impact  point,  about  1.8"  away,  yielded 
higher  stresses  than  obtained  by  either  experimental  or  numerical  Beans;  this  ia 
mainly  accounted  for  by  diserepcney  indicated  in  (vii)  above.  Generally,  the 
agreements  in  the  first  part  of  the  pulse  are  very  good  at  locations  farther 
away,  about  5"»  fro*  the  point  source  where  contributions  froo  the  higher 
frequency  proponents  be  cone  negligible.  The  analysis  generally  yields  a  lower 
amplitude  than  experimental  data;  this  discrepancy  cay  originate  fron  experimental 
error  that  is  described  in  detail  in  Ref.  (32).  Phase  shifts  between  analytic  and 
experimental  solutions  are  also  observed  which  say  be  explained  by  the  difficulty 
in  determining  the  exaet  rise  time  froo  the  experiment  and  eertain  nuaerieal 
errors  resulting  froo  the  iterative  scheme  that  is  introduced  to  solve  the 
dlscrlBlnantal  equation  of  the  quartle  equation  (2.U-U).  The  solution  of  this  equation 
is  the  arrival  times  of  the  body  waves.  Analytical  results  near  the  free  surface 
with  an  angle  9  less  than  1°  yield  snail  spurious  oscillations  before  the 
arrival  of  the  surface  wave;  this  is  due  to  the  round-off  error  resulting  froo 
sueh  an  operation  as  handling  extremely  large  and  small  numbers  simultaneously  in 
the  computer  as  Gakenheimer  and  Rcpnau^^  pointed  out  for  the  isotropic  ease. 

Numerical  differentiation  of  the  measured  input  foree  appears  to  Introduce  certain 
errors  in  the  computation  of  the  aetual  stresses  from  the  stress  convolution 
integral.  This  is  expected  since  the  order  of  magnitude  of  the  time  derivative 
of  the  input  foree  is  icf* ~  10®  lbs/see,  and  a  slight  error  in  the  measurement  of 
the  oscillograu  can  produce  a  significant  change  in  the  calculated  stress  history. 

The  influence  of  modified  inputs  in  the  amplitude  and  phase,  as  discussed  in  the 
following  paragraph,  can  be  seen  from  Fig.  16. 

The  computations  based  on  a  hypothetical  input  force  given  by 

F  %t)  ■  fl  cin‘  9  <  t  <  t  ,  (where  I  is  the  peak  of  the  measured  force  and 

1C  :  t  >  t 
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t  is  twice  the  actual  rise  time)  is  shown  in  Fig.  17,  and  is  in  good  correspondence 
vith  those  results  where  the  actual  input  is  used  in  the  calculations  of  the 
stress.  However,  the  analytical  expression  for  the  input  yicldr  a  slightly 
broader  stress  pulse  than  that  computed  from  the  measured  values.  The  best 
agreement  wi*n  the  *xperimcnt  was  obtained  when  a  symmetric  pulse  was  used  in 
♦he  'oaputation  where  the  entire  rise  portion  of  the  pulse  was  identical  to  that 
measured  but  where  the  rest  of  the  pulse  wan  artificially  changed  to  consist  of 
a  mirror  image  of  the  rise.  However,  if  the  input  pulse  is  already  close  to  a 
symctric  shape,  the  improvement  is,  in  general,  not  great  relative  to  those 
calculations  where  the  actual  force  history  is  used. 

As  shown  in  Fig.  2  of  the  main  report,  numerical  results  using  the  finite 
clement  technique  were  found  to  be  in  better  correspondence  with  the  data  for 
receiver  points  nearer  to  the  source.  This  would  be  expected  since  the  load  is 
inevitably  spread  over  a  finite  area  in  the  finite  clement  method  and  thus  the 
T  int  source  effect  ia  substantially  eliminated.  Such  a  loading  is  required  by 
the  actual  physical  situation  arising  in  the  experiments.  However,  at  distant 
stations  a  complete  time  history  could  not  be  obtained  by  the  finite  element  method 
for  a  sufficient  length  of  time  to  provide  a  meaningful  comparison;  this  is 
mainly  lue  to  the  limitations  of  the  computer  capacity  and  the  time  required 
for  computation. 

Surface  Waves. 

A  computer  program  was  written  which  evaluates  surface  rorul? r,  riven  by 
Sq.  (2.6-U);  however,  an  unstable  oscillatory  result  war.  obtained  due  to  round-off 
er.  rj.  Thus,  t  e  evaluation  of  the  field  quantities  on  the  surface  at  x^  »  0 
was  not  pursued  any  further  in  this  investigation. 
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Since  the  displacement  must  be  continuous  in  the  half -space,  the  field 
quantities  computed  on  a  ray  at  a  shallow  angle  from  the  surface  should  yield  a 
reasonable  approximation  for  those  right  on  the  surface.  The  displacement 
fields  and  the  comparison  of  the  calculated  components  of  stresses  near  the 
surface  with  the  experimental  results  are  shown  in  Fig.  4  of  the  main  report 
and  Appendix  C,  where  good  agreement  is  indicated. 

4.5  Conclusions. 

A  solution  to  the  wave  propagation  problem  in  a  transversely  isotropic  half¬ 
space  under  arbitrary  concentrated  normal  loading  on  the  free  surface  has  been 
presented  within  the  scope  of  the  linear  theory  of  elasticity.  A  mixed  Laplace  and 
two -dimensional  Fourier  transform  and  a  modified  Cagniard-de  Hoop  technique 
were  employed  to  solve  the  problem;  it  should  be  pointed  out  that  this  particular 
method  can  be  used  to  solve  similar  three-dimensional  problems  in  a  solid  possessing 
any  type  of  anisotropy.  The  solution  obtained  in  this  manner  may  be  considered 
as  the  sum  of  responses  due  to  line  sources  spread  uniformly  over  0  to  2v  radians 
on  the  free  surface  all  of  which  are  passing  through  the  loading  point.  Therefore, 
the  solutions  to  a  line  source  input  of  any  orientations  located  in  the  surface 

Can  b*  obtained  easily  fr°®  the  present  formulation  of  the  three-di.mensional  solution 
A  computer  program  which  evaluates  responses  of  displacement,  stress  and 
f train  due  both  to  a  Heaviside  and  to  an  actual  force  input  was  developed  for 
normal  loading.  The  numerical  results  for  a  fundamental  displacement  and  stress 
obtained  from  a  set  of  elastic  constants  for  a  nearly  isotropic  solid  exhibited 
good  correspondence  with  the  known  analytical  results  for  a  corresponding  isotropic 
solid.  For  both  an  isotropic  and  a  transversely  isotropic  medium,  the  solution 
from  the  program  provided  good  agreement  with  experimental  data  for  the  first 
par+  of  the  pulse  for  stations  distant  from  the  impact  point,  although  the 
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remaining  part  of  the  pulse  predicted  lower  amplitudes  than  the  data.  Predictions 
at  stations  nearer  to  the  source  were  generally  not  as  satisfactory  due  to  the 
contributions  from  hf.gher  frequency  components  arising  from  the  singularity  of 
the  point  load  used  in  the  analytical  model  that  does  not  actually  correspond 
to  the  experiment.  The  responses  on  the  surface  of  the  half -space  may  be  obtained 
approximately  by  confuting  them  along  a  ray  near  the  surface  with  a  shallow 
angle,  even  though  an  exact  evaluation  was  not  realized  in  this  investigation. 

The  responses  along  a  ray  in  the  direction  of  the  load  may  not  be  computed  from 
the  present  program  due  to  a  singularity  arising  from  the  transverse  isotrcpy 
of  the  medium;  however,  this  is  not  a  serious  limitation  since  the  responses  along 
this  ray  may  again  be  computer  approximately  as  described  in  the  above.  Also, 
the  program  can  be  used  to  approximately  evaluate  the  responses  of  an  isotropic 
medium  with  reasonable  accuracy  by  introducing  nearly  isotropic  elastic  constants. 
The  mathematical  model  employed  generally  predicted  the  responses  of  the  Yule 
marble  block  tested  under  a  normal  point  load  reasonably  well  in  spite  of 
discrepencies  in  modeling  of  the  type  discussed  in  section  4.3. 

A  conputer  program  for  the  solution  due  to  a  tangential  load  on  the  surface 
may  be  developed  utilizing  the  formulations  presented  here  without  much  difficulty. 
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Table  1.  Velocity  Constanta 


C1 

— 

Yule  [25i 
Marble10  J 

3.8  x  1010 

1.28  x  1010 

Yule  [32] 
Marble15  J 

U.52t)  x  1010 

10 

1.50  x  10 

1.31*  x  101C 

Lime  (25] 
Stone1 

3.1L  x  1010 

.93  x  1010 

2  2 

Velocity  Constants  :  in  /sec 

.Specific  Gravity  :  p  ,  «r/cm 
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Appendix  B 


Users  Manual  and  Fortran  Listing  for  the  Finite 
Element  Method  Applied  to  Wave  Propagation 
Analysis  in  Isotropic  and  Anisotropic  Media 


This  document  replaces  and  supplements  the  Users 
Manual  submitted  previously  (Reference  10  of  Main  Report). 


•  AGE  I 


Ml!  } 


R'l 


SUM3UMM  «AN'jAL 

USE*  INSTRUCTIONS  AN*I  INRUf  FORMAT  S  FO*  f' 


IMTf  CifNfNT  ANALYSIS  PROGRAM 


rfAPTJ  IS  A  GENERAL  IMlNITf  lEIlfMENT  I*IN*LY$IS  IPIPOgRAM 
-H|C»»  PUPNISMFS  TC  Tm £  USE*  *FSM  INPUWOUIPUT,  ELE<*ENl  ASSEMBLY 
AND  S'TtUT  1  ON  OF  EQUATIONS  lllNEAB,  IMPLICIT  ANi)  fRPllClf  TIME 
OfP|Nfl!NY,  NONL  |  Nf  A  j  | »  PRESCRIBED  GENE*ALIZEO  NODAL  FORCES* 
*»FSC*|Hf  »  SOOAl  A‘»0  FlfWfNT  OATA,  ANO  OUTPUT  OF  THE 
GENERALIZE!  niS*'  Afl^NTS  A*n  FC*CES.  ELEMENT  MATRICES  F  0*  T  WO 
INO  fHAEF  Dl-ENSIONAI  LINEAR  ELASTICITY.  SMELLS.  PLATES,  ANO 
MEIO  I L  A  PI  ACT  f  30  AT  |ONI  PROBLEMS  APF  AVAILABLE.  AL  TE  ANA  T  1 Vf  LY 
usf*s  **av  sjrpl*  tm  i*  Own  element  lI*baay  at  p*ovIOIN»  a 
U«BOuT|NE  CALLED  f L**T NN ,  •►‘FRE  NN  I  S  A  TWO  01G1T  NUMBER 
IDENTIFYING  THE  ElF-FNT  SUBROUllNE.  EACH  ELEMENT  SUBROUTINE 
MAS  at  LEAST  f DU*  A  A  S  |  C  FUNCTIONS  WHICH  ARE  OEllNEATEO  AY  A 
SWITCHING  PA*AM£TEP,  I  S  w  ,  1  N  THE  SUBROUTINE. 


ELMTNNIN,MA»NO|M,  NO*  , NEL.NTL  1  »N5I  F»NS  IJV»NVEC*MCT  »0M#  O.XYZ * 
i  i,F.FO»CE,EST|F,«J,VEr  I,ISW» 


N  is  ELEMENT  TIMBER. 

MA  is  THE  MAI  EM | A|  NUMrtER. 

ND1M  is  SPATIAL  DIMENSION*  1*2*0*  >« 

NOF  is  NUMBER  OF  OEGREES  OF  ♦  REEOON  PER  NOOf. 

NEL  l*>  the  number  of  external  NOOES  per  element 

Nt  L  1  IS  OTMfNStON  OF  F  L  E  Mf NT  PROPERTY  ARRAY. 

N  ST*-  IS  THE  SHE  OF  THE  ELEMENT  ,  TIFF  NESS. 

NS  1 14  IS  THE  SIZE  OF  UTILITY  VECTORS. 
nvec  is  the  NUMBER  of  utility  vectors. 

MCT  is  A  PRINTER  LINE  COUNTER. 

OM  IS  A  PARAMETER  fop  material  ioentification. 
OlL.ll  is  MATERIAL  PROPERTY  MATRIX  1 6)  CELLSI • 

I V 1 1  NOl  M  *  |  |  A*  E  NOOAL  COORDINATES. 

I .  I  NEL I  *  II  ARE  ELEMENT  PROPERTIES*  NOOES*  ETC. 
F  NO',  11  APE  NOOAL  GENERALIZE  0  FORCES. 

F  iPCE  I  NS  TE  .  ?  T  IS  ELEMENT  FORCE  VECTOR  TO  BE 

C<  hPUTED.  COLUMN  2  IS  LUMPEO  MASS 

ESTIf  I  NSTF.NSTFl  TS  ELEMENT  MATRIX  TO  BE 

CO*-UTEO. 

VECT  IN*  |  ZV*  1  I  ARE  PRFSCRIBf.O  NOOAL  OR  ELEMENT 
OUANT | T , *S.  TEMPtRATURES  ETC* 

U1N0F.II  IS  SOLUTION  VECTOR. 
lSw  IS  SI  ITCHING  PARAMETER* 


I S W *  ,  •  •  MATERIAL  CHARACTERIZATION** 
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IS*. 2.  ••  CHEC«  ILEM4N1  F 0*  POSITIVE  A*|A  • 
I Sw • } ,  ••  ELEMENT  SIIFFNESS  COMPUTATION** 
I**. A,  ••  ELEMENT  SIRESSES  ANO  PR  I  NTQjT  •• 
|S*«3,  •  •  ILfMFNT  LOAO  CDMPUTATION 
I  *  ■  *  A ,  ••  NONLINEAP  GENERALIZED  FORCES 
OTHER  ISv  may  BE  USED  FOP  SPECIAL  *v*POSES. 

USERS  CAN  GENEPPTE  SURFACE  LOADINGS  BY  PROVIDING  SLONN 
SUAROJT |NFS  INHERE  NN  IS  A  TmO  OlGlI  NUMBER  BETWEEN  Of  ANO  OST 
THRT  SPECIFY  The  LOAO  ROUTINE.  THE  SU9R0UI INE  IS  ACCtSSCO  BY 
THE  CALL  TO 

SIONN|N01M.NOF,NOR.NP*ES.|RPFS,RR,XYZ.FSI 

WMEPF  IN  AOOITION  TO  OUANT | *  I ES  OCFINEO  AMOVE 

FO*  ELMTNNi 

NOR  IS  THE  DIMENSION  OF  LOAOEO  SURFACE 

NPRFS  IS  NUMBER  OF  LOAOEO  NOOES  |MA«  VI 

1  RPF  ?  I  •  I  A*E  NOOE  NUMBERS  OF  LOAOEO  NODES. 

*R IB  I  ARE  LOAO  VALUES  AT  CO»MtS PONOI NG  IP«!S 
NOOES. 

F  S 1  b  *  6  )  ARE  THE  COMPUTEO  GENc.MAHZEO  INOOAlf 
FORCES  FOP  EACH  OIOPEE  OF  FREEDOM  AT  EACH 
1PPES  NOOE. 

-ff  SECTION  7.1  FOR  OATA  INPUT  OETAILS. 


INTEGRATION  TABLE  IS  ACCESSEO  BY  THE  CALL 

CALL  INTEGLU  |N,NC1|N01M,L  INT, STUNT 

STUMU.Ml  INTEGRATION  POINTS  ANO  WEIGHTS. 

•  •NOTE**  M  MUST  BE  SET  EXPLICITLY  AND  BE  L  A  A  G  f  R 
THAN  OR  EOUAL  10  LINT. 

L 1  NT  -  RETURNS  Nl  TH  NUMBER  INTEGRATION  POINTS. 
NCI  •  0  RETURNS  GAUSS  POINTS  ANO  WEIGHTS  IN 
STUN. 

L1M  •  1  10  S  IS  NUMBER  OF  GAUSS  POINTS/OU- 
FC  T  I  ON  . 

NCI  •  1  RETURNS  A  SPECIAL  3~0  GAUSS  * OrtMJLA. 
SET  LIM  ■  1  FOR  6  PT.  CUBIC  ACCURACY 
SET  LIM  ■  2  FOR  1 4,  PT.  QUINTIC  ALLUPACY  ■ 

NCI  •  2  RETURNS  TRIANGULAR  INTEGRATION  HJAMUlA 
SET  LIM  •  i  FOR  1  PT.  IINEAP  ACCURACY. 

SET  LIM  *  2  FOR  1  PT.  QUADRATIC  ACCURACY. 

SET  LIM  •  1  FOR  7  PT.  QUART  1C  ACCURACY. 


1.)  OATA  TYPE  IDENTIFICATION  CAROS  I  IS.  |X, 12A61 . 


PAGE 


PAGE  A 


EACH  DATA  SEGMENT  IS  PREOFOEO  RY  A  C  AF  D  WHICH  IOtNT|F|ES  THE 
TYPE  OF  DATA  AND  li-ITS  ON  THE  AMOUNT  OF  0A1A  WHICH  IMMEDIATELY 
FOLLOWS  THE  CARD.  EilFP*  AS  NOTED  THE  OATA  SEGMENTS  may  APPEAR 
IN  ANY  OuOER.  THE  IDENTITY  CABOS  “AY  ALSO  AIO  THE  USER  IN 
1NTFPPPETT  IMG  THF  INPUT  OATA  CARDS.  AS  SUPPL  IEO  THERE  ARE 
TWFNTY-FIVE  DIFFERENT  OATA  IDENTIFICATION  CAROS.  THESE  ARE 


COL  7  TO  12  I OE NT  I  TV  I  PE  STRICT  IONS  I 


r CAP71 

1  I  TLE 
PFMABR 
MAT  E  B  1 
NODAL 
POLAR 

flemen 

GENERA 

BLOC* 


BDUNOA 

VEC  TOP 

TOBCE 

BL  0  AOS 
ELOAOS 
MESH 
PLOT 
INI Tl  A 

SOL  VF 


RE  SDL V 

EX  PI  1C 

I MPL  1C 

/•SCO? 

FOUR  IE 
A  OO'JP 

STOP 


start  PF  each  BROBLEM  IMUST  precede  all  other 

DATA). 

CHANGE  OUTPUT  page  heaoings 
COMMENTS  ON  OIJTBJT 
MATERIAL  CHARACTERIZATION. 

NODAL  CAROS 

POLAP  CONVERSION.  IPPECEOE  BY  NOOAL. GENERA,  OR 

Bine*  1 

ELEMENT  CONNECTION  CAROS. 

GTNFPATE  NOOES  IN  A  LINEAR  PATH  6Y  AMY  INCREMNT 
OENEPATE  ALL  MESH  DATA  IBOTH  NOOAL  ANO  ELEMENT! 
TCP  A  2 ,  I  DR  3101 MENSIONAL  REGION  NH'JSE  BOuNOARY 
MAY  BE  DEFINED  BY  41BJ0H  3 1 20  1C OL LOC AT E 0  POINTS 
BOUNOARY  CODE  PRESCRIPTION  I  PRECEDE  BY  NOOAL  OP 
GENERATE  OR  BLDCM 

POESCRIREO  NODAL  OP  ELEMENT  OATA  IPRECEJE  BY 
NOOAL  OB  POLAR  AND  EL  E**E  N  J 

NODAL  GENERALIZED  FORCES  1PRECE0E  BY  NOOAL  OR 
f.FNFBA  OB  BLOC*). 

S'JRTACE  LOADINGS  I  SAME  AS  FORCE). 

EL  EMp  NT  LOADINGS  ISA*F  AS  FURCET. 

CHECK  CONSISTENCY  UF  MESH  ONLY  ISAME  AS  SOLVE! 
PL Or  M  SH  ISAME  AS  SOI  VET 

INITIAL  C0NDI1I0N  PRESCRIPTION  FOR  3YNAMJ  C 
ANAIYSIS  I  PRECEDE  BY  NODAL,  GENrRA  DR  BLOCK) 
CrMPl E  T?  FORMULATION  AND  SOLUTION  FRO*  ELEMENTS 
(PRECEDE  MY  MATFPI, NODAL  DR  GENERA,  AND  fLEMcN 
OR  PBr  C F Of  BY  MAI  EH  I  AND  BLOC*  T 
USE  PREVIOUS  PROBLEM  DESCRIPTION  h|TH  NEW  LOAD 
ONLY  )  BB  ECEOE  BY  SOLVE  AND  NeW  LOADING  CARDS). 
OYNAMIC  SOLUTION  PY  EXPLICIT  INTEGRATION.  ISAME 
SOIVF) 

IMPLICIT  INTEGRATION  OF  0  YN  AM  |  C  PROBLEMS 
l  Bu  PC*  DE  BY  SAME  OATA  AS  FOB  SOLVE) 

QUASI  <TAT1C  UNcAR  VI  SC  DEL  A  S  T  |  INTEGRATION 

I RRE  CE  OF  BY  SAME  DATA  AS  FDR  SOLVE) 

FOURIER  r T’MPGSl  T  |  ON  ISAME  AS  SOLVE  1 
ACCUMULATE  FOURIER  SCluUON  IAFIE*  FOUR  I  i  I 
NORMAL  P*IT  |MUS»  FOLLOW  ALL  DATA) 


C  ***NOT  E  •••  EACH  IDENTIFIER  IS  PUNCHED  STARTING  IN  CDL  7  1LPM 

C  JUST  1 F l £01 . 

C 

C  EXCESS  CAROS  MAY  EXIST  BETWEEN  EACH  SECTION  OF  DATA,  MDWrVEL, 

C  THE  OATA  TO  BE  USED  MUST  IMMEDIATELY  FQLLO*.  THE  TYPE  CAHO  AND 

C  MUST  BE  IN  PROPER  ORDER.  NO  PARTICULAR  ORDER  U'  TMtl  TvflE 

C  CAROS  IS  NECESSARY  EXCEPT  THAT  THE  F EAP 7 1  CARD  WJS!  ALWAYS  fit 

C  THE  FIRST  CARD  IN  EACH  SET  OF  OATA,  AND  *E  S  TH  1  TIONS  MJSI  •) 

C  OBSERVEO. 

C 

C 

C  2.)  PROBLEM  INITIATION  ANO  CONTROL  CAROS 
C 


c 

CARO 

1* 

1 6X  *  1 2 A6 1 

c 

COL 

7 
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12 

MUST  CONTAIN  WORD  FEAP73 

c 
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11 

TO 

73 

OUTPUT  PAGE  HEADER 

c 

CARO 

2. 

1 15, 1 X , 3 A6 ) 

c 
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TO 

5 

NOIM  -  SPATIAL  DIMENSION  OF  PROBLEM  1  1  T,  1) 

r. 
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7 

TO 

12 

NAMES  TO  BE  PR  1  NT  FD  AS  QjlPUT  HEADERS  ID 

c 
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TO 

13 

COORDINATES  -  |f  BLANK  SET  TIT  1,2,3  AS  NEEDED. 
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TO 

24 

CARO 

3. 

,  (15.1 

IX, 6*6) 

c 
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TO 

5 

NPF  -  NUMBER  DE  UNKNOWNS  REH  NDOE  (|  TO  61 

c 
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7 

TO 

12 

NAM«=S  TO  BE  PRINTED  AS  OUTPUT  „EADfRS  D»  THE 

r. 

COL 

11 

TO 

IB 

GENERAL  1  ZE  0  DISPLACEMENTS  ANT  fORCES  -  IF 

,  BLANK  SET  TO  1,2,  3, 4, 5,6  AS  NELCSSA-JV 

c 

COL 

17 

TO 

42 

c 

CARO 

A. 

>  1615. 

i  5F 1 0.01 

c 

COL 

1 

TO 

5 

NF  N  -  MAXIMUM  NUMBER  OF  NUDES  CONNECTED  7^  AN* 

c 

ELEMENT  11  TO  201  . 

c 

COL 

b 

TO 

10 

NE  XT  BA  -  1NCPEASES  UFmENT  MATHU  S I  / 1  Fbi)m 

c 

NOF*NLN  TO  NOF*NEN  ♦  NE  x  TH  A 

c 

COL 

1  1 

TO 

15 

1 R  EC  -  COMPUTE  GE  NF  R  AL 1 ZE  0  F  DR  C  E  CH?L<  If 

c 

NONZERO  IFOR  T|me  |  NV  AR  I  AN  I  ANALYSIS  CAL  Y  ) 

c 

COL 

lb 

TO 

20 

MB  AN  -  MAXIMUM  EXPECT'D  BANOwIDTM,  DEFAULT  IS 

r 

SET  TO  100.  USED  AS  AN  E  HR  3®  ChEC.x  T)  opfveNT 

c 

RUNNING  WITH  AN  OBVlDuS  E Pa DR . 

c 

COL 

21 

TO 

25 

1  B'JF  HUFF  EH  SIZE  TOP  S  l  IRA  ,£  OF  HlSlOPY 

c 

PFFEC  IN  T|Mf  DE  b  F  nDE  N 1  ANALYSIS,  DEFAULT  IS 

c 

1 R U F  -  ISZ0T/2D 

c 

COL 

26 

TP 

30 

NCI  -  USEP  INTEGFP  constant 

r. 

COL 

31 

TO 

40 

enNI  -  USER  Off  IKED  CONSTANT 

c 

COL 

Al 

TO 

50 

C0N2  -  USEP  DEFINEO  CONSTANT 

*»*Cf 


MAGE  * 


COL  5|  10  *0  COSH  I  I  -  uSf*  OEMSFO  CONSTANT 

COL  *1  fO  70  f  t’,N1 1  i  I  -  U5f«  OfHNfO  C  JNtl  ANT 

COL  U  TO  59  CCS  Jl  ) |  USE*  OETISEO  CONSTANT 

•»6*A*ft«  USt*  CWfNTS  ON  OUTPUT.  ItS.WAA) 

SUBSEQUENT  CA*OS 

fOL  T  TO  12  *UST  CONTAIN  •r*A»« 

COL  I  J  TO  TP  STATEMENTS  TO  PE  OUTPUT  ,  USE  AS  many  REMAP* 

CA*f)S  AS  PESIMO.  INSE*T  BEFORE  ANV  TY«E  CARO. 

2.?»  TITLE  CHANCE  ON  OUTPUT  l*i,, .16) 

COL  T  TO  12  MUST  CONTAIN  TITLE 

COL  13  TO  TA  NT  w  TtHf  OESCR|*TOR 

2.3)  EXECUTION  TERMINATION  lftl,A4) 

COL  7  TO  10  MUST  CONTAIN  STOP,  INSERT  AFTER  LAST  PROBLEM. 


3,1  MiTE*UL  CHARACTI*  l/ATION  1 1 5*  I  *  i  1 2A6I 

COL  I  TO  5  NUMmaT  -  NUMBER  OF  OlfFEQENT  MATERIAL  CHARACT- 
I* 1 2 AT  IONS  TO  FOLLOW. 

COL  1  TO  12  MUST  CONTAIN  WOXQ  MAT E*  I 

THE  FOLLOmING  C A*OS  ARE  SUPPLIED  FOR  EACH  MATERIAL  TO  BE  CHARAC 
TERWEO  (MUST  BE  EXACTLY  NUMMAT  SETS  OF  CAROSI 

CARQ  I.|  ELEMENT  SELECTOR  CAPO  115, lX, A*  ||A61 


COt  i  TO  5 
COL  7  TO  IT 

COL  | 2  TQ  TT 


-ATFRIAL  NUMBER  II  TO  NUMMAT | 

FLMNN  WHERE  NN  IS  NUMBER  OF  ELEMENT  CLASS  101 
TQ  301  TO  WHICH  THE  CHAR  ACTE R 1 1 A T I  ON  BELONGS. 
ALPHANUMERIC  INFORMATION  TO  BE  OUTPUT. 


CARO  2*1,  ETC.  ••  USE"  OEF |NE 0  FOR  EACH  ELEMENT  TYPE  PROVIOEO. 


* .  I  NODAL  CAROS  I  I5,]X,A61 


COL  I  10  5  NUMNP  -  NUMBER  OF  NOOAL  -JINTS 

cm.  T  TU  12  MUST  CONTAIN  NODAL 


SUBSEO'JENT  CAROS  LAST  NOOAL  CARO  MUST  NOT  BE  GENERATED. 
I  15,1 15,3*10.01 


COL  I  TO  5  NOOF  NU“«FR 

Cf5*-  I  IF  I  DISPLACEMENT  IS  SPECIFIEO 


C  COL  I A  I  IF  2  OISPLACEMFNI  IS  S«FClf|EO 

C  COL  TT  1  IF  3  OISRLACLMFNT  IS  SPECIFIEO 

C  COL  !•  I  IF  *  DISPLACEMENT  is  $peci*iio 

COL  I*  I  IF  5  OISPLACfMENl  IS  SPECJFTfO 

COL  20  I  I*  6  0|<*LAtE«fNl  IS  SPECIHEO 

C  COL  21  IQ  30  T  CQ0*0(NAU  VALUE 

CCL  31  TO  *0  2  COORDINATE  VALUE  •  AS  MQ'JIMO 

C  COL  At  TO  50  3  COORDINATE  VALUE 

C 

C  NOOAL  CAROS  MUST  BE  IN  OROER.  MISSING  NOOE S  ARE  INTERPOLATED 

C  LlNfA*tV  FROM  INPUT  NOOES.  |F  SUCCFFOING  CAROS  HAVE  IDENTICAL 

C  BOUNDARY  COOES,  THIS  BOUNDARY  COOE  WILL  BE  ASSIGNEO  TO  IhE  INTER* 

C  VENING  NOOES.  IN  ALL  OTmE*  CASES  ImE  BOUNOAAV  COOE  IS  SET  TO  ZERO 

C  *TERM|NATE  ON  NOOE  NUMNP  OR  A  PLAN*  CARO* 

C 

'  A. I  I  NON  SEQUENTIAL  NOOAL  GENERATOR  OPTION.  I  15, T‘, Aft) 

C 

C  COL  I  TO  5  NUMBER  OF  NOOAL  POINTS 

C  COL  7  TO  12  MUSI  CONTAIN  GENERA 

C 

C  SUBSEQUENT  CAROS  I  2 1  5 . I  10, 3F 1 0.0 1 

C 

C  COL  I  TO  5 

C  COL  6  TO  10 

C 
C 

C  COL  15  TO  20 

C 
C 

c 
c 

C  COL  21  TO  30 

C  COL  31  TO  AO 

C  COL  A I  TO  50 

C 

C  •TERMINATE  Ml TH  BLANK  CARO  • 

C 

C  A. 21  60UN0ARV  COOE  PATCH-UP  OPTION.  16X,A6I 

C 

C  COL  A  TO  12  MUST  CONTAIN  AOUNOA 

C 

C  SUBSEQUENT  CAROS.  18151 

C 

C  COL  I  TO  5  N,  NOOE  NUMBER  TO  HAVE  REOEF  |  NF  0  BOUNDARY  CC'lc. 

f  COL  6  TO  |0  NX,  GENERATOR  INCREMENT  TO  BE  AOOEO  Al  ,6  8  PA  I 

C  CAILY  TO  N,  UNTIL  SU“  EXCEEOS  (MAX  OR  MINI  Tmc 

C  N  OF  THE  FOLLOWING  CARO. 

C  COL  II  TO  15  I  AC  I  I  )  «  1 1  •  1 , 2  •  •  .NOF  )  COOE  FOR  SPECIFYING  KM  C  E 

C  COL  16  TO  20  OR  DISPLACEMENT  BOUNOARY  CONDITIONS, 

C  COL  ... 


NOOE -NUMBER 

NOOC -NUMBER-INCREMENT  WHICH  WILL  BE  SJCfcSSIVElY 
AOOEO  TO  N00E-NUM6ER  UNTIL  SUM  IS  GRbAlfc*  THAN 
NOOE -NUMBER  ON  FOLLOWING  CARO  I  ALGEBRAIC  I « 
BOUNOARY  COOE.  SAMf  A$  INPUT  FOR  NOOAL. 

IF  SUCCEEDING  CA«OS  HAVE  IDENTICAL  BOUNDARY 
COOES,  THIS  BOUNOARY  COOfc  WILL  BE  ASSIGNED  TO 
THE  INTERVENING  NODES.  IN  ALL  OTHER  CASES  Thc 
BOUNOARY  COOE  IS  SET  TO  2ER0. 

1  COOPOINATE  VALUE  • 

2  COOPOINATE  VALUE  •  AS  REOUIkEO  • 

3  COOPOINATE  VALUE  • 
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IBCIII  . EO.  0,  FORCE  SPECIFIEO. 

IBCIII  .r,T.  0,  DISPLACEMENT  specified,  no 
INTERVFNING  GENERATION. 

I*JCIII  .LT.  0,  DISPLACEMENT  SPECIFIEO, 
GENFRATE  BETWEEN  MISSING  NOOES  IN  ALGEBRAIC 
INCREMENTS  OF  NX. 

•  TERMINATE  WITH  A  PLAN*  CARO.  * 

4.31  POLAR  OR  CYLINORICAI  COOROINATF  CONVERSION  TO  CARTESIAN 
COORDINATES  I  6*, AM 

COL  7  TO  12  MUST  CONTAIN  POLAR  IIEFT  JUST1FIE0) 

CAR  )  1.  |  3  I  5 , 5X , 2F ) 0. 0 ) 

r0L  II  TO  |5  N3,  INCREMENT  AOOEO  I ALGE 8R A ICALL Yl ,  Nl  TO  N2 

OL  T  TO  5  NJ,  FIRST  NOOE  TO  8F  CONVERTEO 

rDL  6  TO  10  N2 ,  LA  SI  NOOE  TO  BE  CONVERTEO 

C  JL  21  TO  30  XO,  OFIOIN  QT  POLAR  X-CJOROINATE 

COL  31  tq  *o  YQ ,  ORIGIN  OF  POLAR  Y-COOROINAIE 

5.1  ELEMENT  CAROS  I  15,1  X,  AM 

"OL  1  TO  5  NUWFl  -  NUMBER  OF  ELEMENTS 

COL  7  |0  12  MUST  CONTAIN  ELEMEN 

S  JBSEOUENT  CAROS  161 5,201 3/201  A) 

CAQO  l. 

COL  l  TO  S  ELFMPNI  NUMBER 

COL  ft  TO  10  MATERIAL  NUMBER 

COL  11  TO  IS  NUMBER  PF  SUBSEQUENT  ELEMENTS  USING  SAME 
STIFFNESS  MATRIX  •  SAVES  RECOMPUTATION  OF 
SIMILAR  MATRICES.  ELEMENT  MUST  ALSO  HAVE 
SAMf  F  L  F  Mf  NT  FORCE  VECTOR  •  IF  ThESF  ARE 
IN  TMF  STIFFNESS  SUBROUTINE  • 

COL  1ft  TO  20  PRINT  ELEMENT  MATRIX  (f  N0N2ER1. 

COL  21  TO  23  iXOin  ELEMENT  INCREMENT  ARRAY  ON  NOOE  l. 

COL  24  TO  2ft  1X0121  •  IE  NOT  INPUT  IS  SET  AUTOMATICALLY 

UP  TO 

COl  79  TO  BO  IX0I20I  FOR  SERENOIPITV  ELEMENTS  •  SEE  REPORT 
CABO  2. 

COL  I  10  4  NOOE  ; 

COL  5  TO  3  NOOf  2 

COL  N  TQ  12  NOPE  \  (K|NUI,1>  ARRAr 

continue  IN  14  format  TO  A  maximum 
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C  COL  77  TO  BO  NOOE  20 

C 

C  NOOES  HOST  8E  NUMBERED  AROUNO  ELEMENT  BY  A I GHT  NANO  GCRc  RJLF, 

'■  ELEHENT  CAROS  HUST  8E  IN  OROER.  MISSING  ELEHENIS  ARfc  GEN-RAlfO  rtf 

C  I NCREHENT I  NO  NOOES. 

C  LAST  ELEHENT  CARO  HUST  NOT  BE  GENERATES. 

•  TERHINATE  On  ELEHENT  NUHEL  OR  A  BLANK  CARO  • 

C  8. I l  SLOCK  GENERATOR,  GENERATES  ALL  HES"  0ATA.18K.A6I 

C  COL  I  TO  5  NUHBFO  Of  NOOAL  POINTS  TO  RE  GENERATED. 

C  COL  7  TO  17  HUST  CONTAIN  BLOCK 

C 

C  SUBSEQUENT  CAROS  I  101 5761 5/1 IOK, 3F 10.01 1 

C 

C  CARO  I. 

C 

C  COl  1  TO  5  KK,  NUHBER  OF  POINTS  REQUIRED  TO  DEFINE 

C  BOIJNOARY  OF  REGION.  FOR  J-OIM.,  NN.A  UR  8. 

c  FOR  3-  0 1 H, ,  NN-  B  OR  JO. 

C  COL  6  TO  10  NUHBER  OF  ELEMENTS  IN  R-0IRECTI3N. 

COL  11  TO  15  NUMBER  OF  ELEMENTS  IN  S-OIRECUON. 

COL  16  TO  JO  NIJMBFR  OF  ELEMENTS  IN  T-OIRECTION. 

C  COL  Jl  TO  J 5  INITIAL  NOOE  NUMBER,  OETAULI  1. 

C  COL  J6  TO  30  INITIAL  ELEHENT  NUMBER ,  OEFAJlI  •  1. 

C  COL  3L  TO  35  MATERIAL  NUHBER  OVER  RFGIUN.  DEFAULT  =  l 

C  COL  16  TO  AO  BOUNOARV  COOE  SKIP.  A  NON-JERO  ENTRY  Ml. I  OMIT 

C  SETTING  ALL  INTERIOR  BOUNOARY  COOES  Til  /r»0. 

C  COL  *1  TO  A 5  IRFUEE  -  REUSE  ELEHENT  STIFFNESS  CRT  t  ON  -  USr5 

C  FACM  FLEHENT  STIFFNESS  IREUSE  TIMES  BEFORE 

C  GENERATING  A  NEH  ELEMEN!  STIFFNESS  MATRIX, 

C  COL  A6  TO  SO  ELEMENT  STIFFNESS-PRINT.  A  NON- ZERO  ENTRY  Mill 

C  CAUSE  PP 1  NT-OUT  OF  FIRST  ELEHENT. 

COl  SI  TO  55  I H5H  -  IF  NONJERQ  SUPPRESSES  PPINT  OF  NOOtS. 

COl  56  TO  60  IEIM  -  |F  NONJERO  SUPPRESSES  PRINT  OF  ELEMI-NIS. 

C  CARO  J.  I BOUNOARY  COOE  AS  OEF |NEO  IN  NOOAL  CARO. I 

C 

C  COL  I  TO  |0  BOUNOARY  COOE  OVER  FACE  -R. 

C  COL  11  TO  JO  BOUNOARY  CODE  OYER  FAl  E  *R. 

C  COL  Jl  TO  30  BOUNOARV  COOE  OYER  'ACE  -S. 

C  COL  A 1  TO  50  BOUNOARY  COOE  OYER  RACE  <S. 

C  COl  Al  TO  50  BOUNOARY  COOE  OYER  FACE  -T. 

C  COL  51  TO  60  BOUNOARY  COOE  OYER  FACE  •  T. 

C 

CARO  ).  IREPEAT  NN  TI»S5.1 

C 

COC  11  TO  JO  1  COOPOINATE  O'  B HUNGARY -OEF | U1NG-PJ I N T . 

EDI  Jl  TO  30  J-COPROINATE  OF  BOUNOAR  Y-OE  F  INI  NC, -PO I  N  T  . 

C  COL  31  TO  AO  3-COOROINATE  Of  BOUNOAR V-OEF 1NING-PQ I  NT . 
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NQTF  #  BLOC*  G'NfRATFS  n*il  V  4  PT.  SUADA  HAT  t  BA|_  S  OB  •  PT.  ttRIC*S. 
INPJT  Of  CARDS  3.1  FCLLOw  0*06  B  RULES  I  OB  ELEMENT  INPUT  ISfcE  5.1 
•  -S-T  BftE  LOCAL  COORDINATES,  I.F.  I  I  .Lt.  R,S,T  .16.  1.  \ 
-ME«E  B  is  DIRECTED  Far-  NODE  I  TO  2,  S  IS  IN  PLANE  OF  F  IBS  T 
TH*EE  NODES,  AND  T  IS  NORMAL  TO  A-S  PLANE. 

6.1  VFCTQa  CAADS,  I.E.  U<ER  OEFINEO  INPUl  IIS,lX,A6l 

CDL  I  TO  6  NVEC  •  NUMBER  OF  OIFF6R6NT  VECTORS  IT  MAX I 

COL  T  TO  12  MUST  CONIAIN  VECTOA 

SUBSEQUENT  CAROS 


C A AO  I «  T2T5J 


COL  1  TO  5  NS (2  V,  VECTOR  LENGTH, COMMON  TO  ALL  NVEC  VECTORS 

COL  6  TO  10  IPICK,  CODED  PARAMETER. 

I P  I C  *  •  0,  VECTORS  ASSOCIATED  WITH  NODES 
I P ICB  •  1,  VECTORS  ASSOC  I ATEO  WITH  OEG.FREEOOM 
|PfC«  •  2,  VECTORS  ASSOCI  ATEO  WITH  ELEMENTS 

CARO  2.  I  AX •  2A6 1  REPEAT  NVEC  TIMES 

COL  1  TO  IB  DESCRIPTIVE  TITLE  FOR  VECTOR 

CARO  1.  12IS.TF10.01 


COL  I  TO  5 
COL  II  TO  20 
COL  6  TO  10 
COL  21  TO  JO 
COL  . 


POSITION  NUMBFP  Of  VECTOR  ELEMENT ,  1  TO  NSIZV 

VICTOR  ELEMENT  VALUE  of  vector  1 

C.FNEPATUR  INCREMENT 

VECTOR  ELFMENT  VALUE  OF  VECTOR  2 

AS  RFOUIREO  FOR  NVEC  VECTORS 


LINEAR  INTERPOLATION  IS  PEPFORMEO  ON  ALL  VECTORS  BETWEEN 
NUN-FQNSECUTIVE  POSITION  NUMBERS  SPEC  IF  1 60  IN  COL  1  TO  5  IF 
INCREMENT  IS  NONZERO. 

IF  UESCR1PTIVE  TITLES  OF  ALL  VECTORS  ARE  BLANK  CAR  OS , PB TNT  I NG 
OF  THE  VECTDP  VALUE S  IS  SUPRESSEO. 


•  terminate  DN  blank  CARO  • 

6.11  INITIAL  CONDI  I  IONS  FOR  TIME  OEPENOENT  ANALYSIS* 

COL  1  TO  6  NILO,  NUMBER  OF  INITIAL  CONDITION  VECTORS 

COL  T  TO  12  MUST  CONTAIN  INI T I A 

SUBSEQUENT  CAROS 


C 

C 

C 

C 

C 

C 

r 

C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


CARO  1.  I  6 X , 2 A6 1  REPEAT  NICO  TIMES 

COL  T  TO  II  DESCRIPTIVE  TITLE  EOR  INITIAL  CONDITIONS 
CARO  2.  I  21 5, IF  10.0) 


COL  i  5 
COL  6  0  ID 

CDL  11  TO  20 
COL  21  TO  JO 
COL . 


POSITION  NUMBER,  AS  IN  VECTOR  CAROS  FOR  IPTCK-1 
GENERATOR  INCREMENT 
INITIAL  CONOITION  1 
INITIAL  CONOITION  2 

AS  REOUIREO  FOR  NICO  INITIAL  CONDITIONS 


INTERPOLATION  BETWEEN  INPUT  VALUES  AS  OESCRIdEO  IN  VECTOR  INPUT. 
•  •••  NOTE  ••••  IF  MISSING  THE  INITIAL  CONDITIONS  ARE  SET  ZERO 

T.)  FORCE  CAROS  1I5,1X,A6) 

COL  1  TO  5  LAST  NODE  TO  WHICH  A  FORCE  I S  TO  BE  SPECIFIED 

COL  T  TO  12  MUST  CONTAIN  FORCE 


SUBSEQUENT  CARDS  I  IS , 5X.6F  10.0 1 


THE  FOLLOWING  VALUES  ARE  EACH  INTERPRETTEO  AS  FORCES  IF  THE 
CORRESPONDING  BOUNDARY  COOE  IS  A  0  *ZERQ*  ANO  AS  A  DISPLACEMENT 


IF 

THE 

CORRESPONDING 

BOUNDARY  COOE  IS  1  *ONE*. 

COL 

1 

TO 

5 

NOOE 

TO  < 

WHICH  FORCE  OP  DISPLACEMENT  TS  APPLIED 

COL 

11 

TO 

20 

VALUE 

Oe 

1 

FORCE /DISPLACEMENT 

COL 

21 

TO 

30 

VALUE 

OF 

2 

FORCE/ 01 SPlACEMENT  *  AS  • 

COL 

31 

TO 

40 

VALUE 

OF 

3 

FORCE/ 01 SPLACE ME  NT  *  REQUIRED  • 

COL 

41 

TO 

50 

VALUE 

OF 

4 

FORCE/OI SPLACEMENT 

COL 

SI 

TO 

60 

VALUE 

CF 

5 

FORCE/ 01 SPLACEMENT 

COL 

61 

TO 

70 

VALUE 

OF 

6 

FORCE/OI SPLACEMENT 

1) 

SURFACE 

LOAO 

CAROS  1 15, IX, A6) 

cot 

1  TO 

5 

NUMBER  OF  LOADED  FACE  CAROS 

COL 

7  TO 

12 

MUST  CONTAIN  6L0A0S 

CARO  1.  I  15, IX, A5, 14,615,613  1 


COL  l  TO  5 
COL  7  TO  11 

COL  12  TO  15 

COL  16  TO  20 
COL  21  TO  25 
COL  *•• 


01  ME  NS  I  ON  OF  LOAOING  SURFACE,  11  OR  2». 

SLOT  NN) ,  ALPHA-NUMERIC  NAME  OF  SURFACE  LOADING 
SUBROUTINF  INN  IS  BETWEEN  I  ANO  51 
NAT, NUMBER  OF  ADDITIONAL  ELEMENT  LOAD 
SURFACES  TO  BE  GENEPAT 20  FPQM  CURRENT  MOOCL. 
IPRES1N),  NODE  NUMBERS  DEFINING  LOAOING  SURFACE 
OF  CURRENT  ELEMENT. 

MOENTlFY  FROM  2  TO  B  AS  REOUIREOI 
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COL 

51  TO  55 

r  OL 

V  TO  58 

'  GL 

*9  TO  61 

COL 

... 

CARO  , 

t.  (  Bf  10. ( 

COL 

l  TO  80 

INCTNI,  INCREMENT  VALUE  AOUcO  TO  1PRESIN)  TO 
1 0  ENT  I Fy  NODE  NUMBERS  OF  A  GENERATED  SEQUENCE. 
IIOENTIFY  FPOM  2  TO  8  AS  REOUIREOI 


L  0 AO  AT  NODES  GIVEN  ON  PREVIOUS  CARO  • 

MUST  CORRESPONO  IN  SEQUENCE  TO  THE  NOOE  NUMBERS 


7.21  ELEMENT  LOAD  CAROS  115, IX, Aft  I 

COL  1  TO  5  NLO,  NUMBEP  OF  ELEMENT  LOAD  CAROS. 
COL  7  TO  1!  MUST  CONTAIN  ELQAOS 


SUBSEQUENT  CAROS  I  IS,  IX, AS, 14, 15, 6F1D.DI 


COL  1  TO  5 
COL  l  TO  U 


COl  12  TO  15 
COL  16  T0  20 
COL  21  TO  BO 


|EL,  INITIAL  ELEMENT  OE  A  GENERATED  SEQUENCE. 
EIM(NN),  ALPHA-NUMERIC  NAME  OF  ELEMENT 
SUBROUTINE  WHERE  ELEMENT  LDAOS  ARE  COMPUTEO. 
USEO  AS  CHECK  TO  INSURE  I  EL ,  ET.Z  ARE  PROPER 
ELEMENTS. 

INC,  1NCPEMENT  NUMBEP  IN  A  GENERATED  SEQUENCE, 
(OFF  AULT  *1). 

JEL,  TERMINAL  ELFMENT  NUMBER  IN  A  GENERAT60 
SEQUENCE,  IF  JEL  •  0.  ONLY  TEL  IS  COUNTED. 

USE*  OEFINFD  VALUES  FOR  DETERMINING  BODY  10A0S 
IN  THF  ISW-5  PORTION  OF  ELMINN1. 


NOTE,  USE"  M-JST  P°')V  IDE  COMPUTATION  OF  LOADS  IN  ElNTNN. 
PB  IS  TPANSFEREO  TO  SUBROUTINE  ELMTNN  IN  THE  U  VECTOR, 
WHEN  ISW  «S,  ONLY. 

7.31  PROPORTIONAL  LOADS  FOB  TIME  OE  PENOFNT  ANALYSIS 

TRANSFER  TO  THIS  OPTION  OCCURS  ONLY  Fro  TIME  ANALYSES. 


ONE 

CAPO  FOR 

EACH  PROPORTIONAL  LOAO  PEDUIREO 

COL 

1 

TO 

5 

PRQProTIONAL  LOAD  TYPE,  1,2  OR 

3 

COL 

6 

TO 

10 

K,  table  constant 

COl 

11 

TP 

20 

TMTN,  SMALLEST  TIME  LOADING  IS 

VALID 

col 

21 

TO 

JO 

TWA*,  LARGEST  TIME  LOADING  IS 

VAL  10 

COL 

11 

TO 

40 

AO 

rriL 

41 

TO 

50 

A  1 

COL 

51 

TO 

60 

A? 

COL 

61 

TO 

70 

A  3 

COL 

71 

TO 

BO 

A4 

C 

C  LOAD  TVPE  1.  T  -  TIME 

C 

C  PROP  ■  AO  ♦  A 1 *T  ♦  A 2* T*T  t  A3*T*!*T  i  A4*T*I*T*T 

C 

C  LOAO  TYPE  2. 

C 

C  PROP  ■  AD*ISINTA|*T)  )**K  •  A2  •  1 CQSI  A  J  •  T  I  1  K  *  A*, 

C 

C  LOAO  TYPE  3* 

C 

C  PROP  ■  USER  OEFINEO  FUNCTION  FROM  SUBROUTINE  EXPRLOI PROP , T  I 

C 

C  •'•NOTE**  PROPORTIONAL  LOAOS  CAN  8E  ACCUMULATED  FROM  OlFFtPENT 

C  TYPES  AT  THE  SAME  TIME. 

C 

C  8.1  INITIATION  OF  TIME  INDEPENDENT  SOLUTION  IIS.lX.Atl 

C 

C  COL  1  TO  4 

C 

r 
c 
c 

c 

C  r.OL  T  TO  12 

C 

C  COL  T  TO  12 

C 

c 
c 

C  8.11  INITIATION  OF  DYNAMIC  SOLUTION  BY  EXPLICIT  I  NT  EGP  A  T ION . 

C 


C 

c 

c 

c 

COL 

l 

TO 

4 

TOUT,  OUTPUT  CONTROL  FOR  01  SPLACE  Mfc  NT  Arj'J 

ST  PE  S  S  PRINTOUT.  SFE  SECT.  9  FOR  OATA  INPUT. 

IF  | OUT  .NE.  0,  THE  SPATIAL  CONTROL  JA14 

COMES  AT  THE  ENO  OF  THE  DYNAMIC  SEGMENT. 

c 

COL 

T 

TO 

T  2 

MUST  CONTAIN  EXPLIC 

c 

SUBSEQUENT 

CAROS  1215, 2F10. 0,215) 

c 

COL 

I 

TO 

5 

NUMBER  OF  TIME  STEPS 

c 

COL 

6 

TO 

10 

PR  [NT  INTERVAL 

c 

COL 

11 

TO 

20 

T|"F  INCREMENT 

r 

COL 

21 

TO 

30 

NF k  MARK  DELTA -0AMPU4G  TERM  {GAMMA  .5) 

C 

COL 

31 

TO 

35 

NUMBER  OF  TIME  EVOLU’ION  STO?SS  PLOT*. 

c 

COL 

36 

TO 

40 

NP»OP,  NUMBE0  OF  PROPORTIONAL  UAOS  TO  BE  1NPU 

c 

c 

COL 

AT 

TO 

45 

NFORC,  LAST  NOOE  ON  WH|Ch  A  f(>CE  IS  CuANGLO 
OUR  I  NO  EACH  T IME  STEP. 

c 

f 

COL 

46 

TO 

50 

KKK,  STABILITY  CHECK  PVERRIOE  ••  CAUTION  USE 
ONLY  WHEN  A  Hf  T  TER  ESTIMATE  Of  THE  STABLE  TIME 

10UT,  OUTPUT  CONTROL  CODE, 

I  OUT  .ED.  0,  ALL  STPTSSES  ANO  DISP.  PR  INTfcO 
KUT  .NF.  0,  SELECTED  PRINTOUT,  MORE  DATA  INPUT 
SCE  SECTION  9  FOR  OATA  PREPARATION. 

MUST  CONTAIN  SOLVE  •INDICATES  ALL  DATA  INPUT* 
COMPLETE  FORMULATION  ANO  SOLJMUN  OF  EQUATIONS. 
MUST  CONTAIN  PESOlV  TO  OBTAIN  SU8SE  JUfM 
SOLUTIONS  WHERE  BOUNPAPY  COOES  00  NOT  IMANGF 
ANO  ALL  PRESCRIBED  01 SPLACE *ENT S  ARE  ZERO. 
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STEP  IS  AVAILABLE  THAN  CAN  BE  PERFORMED  BY  COOE 
KKK  ZERO,  USES  INTERNAL  STABILITY  CHECK. 

KKK  NONZERO,  OISREGAROS  STABILITY  CHECK. 

SUBSEQUENT  CARDS  HIS)  ONE  FOP  EACH  STPESS  PLOT. 

COL  1  TO  S  ELEMFNT  NUMBER  CONTAINING  STRESS  TO  BE  PLOTTED. 

COL  6  TO  10  LOCAL  COORDINATE  POINT  COOE,  1  TO  7,  AS 

PATTERN-0  AFTER,  COL  II  TO  COL  IT,  IN  SOLVE. 

COL  11  TO  15  STRESS  COMPONENT  COOE,  I  TO  6  FOR  SIGMAI1.J1, 

I.E.,  S1GMAI1,  ll-I,  SIGMAll.21-2,  S1GMA1 1 , 31 -3, 
S I GMAI  2,2)  ■  A,  S 1GMAI  2,31  -  5,  S1GMAI3.31  -  6. 

IFl  NPROP.NE.Ol  READ  PROPORTIONAL  LOAD  CAROS,  SEE  SECT.  7.3 

IFINFORC  .NE.01  R  E  AO  FOPCE  CAROS  AT  EACH  T I MF  STEP.  IF  OUTPUT  IS 
LIMITED  BY  I  OUT  NONZERO.  THE  FIRST  FORCE  CARO  SET  PRECEOES 
OUTPUT  CAROS  ANO  THE  PEMAINOER  FOLLOW  THE  OUTPUT  CAROS  NO  BLANK 
CAROS  MAY  BE  USEO  BETWEEN  SETS  OF  CAROS  OTHER  THAN  THE  USUAL 
BLANK  TERMINATOR  CARO  FOP  FORCE  INPUT  CAROS. 

IFl IOUT.NE.OI  OATA  FOR  SPATIAL  PRINTOUT  CONTROL,  SEE  SECT. 9. 


SPECIAL  COMMENTS  FOP  OYNAMIC  OPTION 

III  ONLY  COLUMNS  1  TO  60  ARE  AVAILABLE  FOR  PAGE  HEAOING. 

121  MAXIMUM  ADVANTAGE  OF  ELEMENT  REUSE  DPTION  SHOULO  BE  TAKEN. 

131  1N111AL  CONDITIONS  FOR  DISPLACEMENT  ANO  VELOCITY  VECTORS, 

AS  WELL  AS  STORAGE  FOP  ACCELERATION  VECTOR,  MAY  BE  MAOE 
THROUGH  INPUT  OF  AN  INITIAL  CONDITION  CARD  SET,  WITHOUT 
SPECIFIEO  INITIAL  CCNOII IONS  THEY  ARE  AUTOMATICALLY  SET  ZERO. 

14)  SPATIAL  LOAD  I NG  IS  INPUT  THROUGH  FORCE  OR  BOUNDARY 

PRESSURE  CAROS.  ALL  10A0S  VARY  PROPORTIONALY  WITH  TIME 

151  EXTREME  CAUTION  ON  ORDER  OF  QATA  CAROS  MUST  BE  OBSERVEO.  NO 
EXTRA  CAROS  ARE  REPM I TTFO  ANO  STRICT  COUNTS  ARE  OBSERVEO 
EXCEPT  FOR  THE  NUMBER  OF  FORCE  CAROS  USEO  IN  EACH  TIME  STEP. 

3.21  INITIATION  OF  I -PL  I C  IT  T(ME  INTEGRATIONS  (I5,IX,A61 

COL  1  TO  5  NSFQ,  NUMBER  OF  TIME  SEQUENCES 

COL  7  10  12  MUST  CONTAIN  VISCOE  FOR  LINEAR  VISCOELASTIC 

OUASI -  SI  AT IC  PROBLEMS  10NE  INITIAL  CONOITION 
ONLY  MUST  RE  USEO) 

COL  7  TO  12  MUST  CONTAIN  IMPLIC  FOR  DYNAMIC  IMPLICIT 

integration:  itmree  .nitial  CONOITIONS  ake 
RFOUIREO.  MORE  CAN  BL  SPECIFIED  WITHOUT  ERROR) 

SUBSEQUENT  CAROS,  ONF  SET  FOR  EACH  TIME  SEQUENCE 
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SUPPESSEO  BY  NON-ZERO  ENTRIES  AS  FOLLOWS, 

E.G. 

rot  11  SUPRFSS  PRINT  AT  LOCAL  POINT  1,  1  0,  0,  0) 

COL  12  SUPPESS  PRINT  AT  LOCAL  POINT  2,  1-1,  0,  0) 

COL  li  SUPRESS  PRINT  AT  LOCAL  POINT  3,  I  1,  0,  0) 

COL  14  SUPRC S S  PRINT  AT  LOCAL  POINT  4,  I  0,-1,  0) 

COL  15  SUPRESS  PRINT  AT  LOCAL  POINT  5,  1  0,  1,  01 

LOL  14  SIJP PE S S  PRINT  AT  LOCAL  POINT  6,  I  0,  0,-1) 

CUl  17  SUPPESS  PRINT  AT  LOCAL  POINT  7,  1  0,  0,  11 

SUBSEQUENT  CAROS  I21S1  SKIP  IF  NUMSTR  •  0 

COL  1  TO  5  ELEMENT  NUMBER  TO  BE  PRINTED. 

COL  6  TO  10  MIC.HFR  FLFMFNT  NUMBER  OF  A  GENERATEO  SEQUENCE, 

IF  Z  FRO  ONLY  FIRST  ELEMENT  IS  COUNTS  I*. 

COL  II  TO  15  INCRE**FNT  TO  GENERATOR,  OEFAUIT  ■  I 

im  REPEAT  UNTIL, NUMSTR  CAROS  HAVE  BEEN  REAO 


C  CARO  1.  (FIO. 0, 615, 2FI 0.01 

C 

C  COL  1  TO  10  OT,  TIME  INCREMENT  1N0NZER0  FOR  IMRL1C1 

C  COL  11  TO  15  NTS,  NUMBER  OF  TIME  STEPS  IN  SEQUENCE 

C  COL  16  TO  20  INT,  PRINT  INTERVAL  10EFAULT  I) 

C  COL  21  TO  25  NNI ,  FIRST  NODE  PRINTEO 

C  COL  26  TO  30  NNE ,  LAST  NOOE  RRINTEO 

C  COL  31  TO  3S  NEI.  FIRST  ELEMENT  STRESS  TO  BE  PRINTED 

C  COL  36  TO  40  NEF ,  LAST  ELEMENT  STRESS  TO  BE  PRINTEO 

C  COL  41  TO  45  NPROP,  NUMBER  OF  PROPORTIONAL  LOAOS  IN  SEQUENCE 

C  COL  46  TO  50  NFORC,  LAST  NOOE  FOR  GENERALIZED  FORCES  TO  BE 

C  INPUT  FOR  EACH  1 1  ME  IN  SEQUENCE  ISEE  SECT. 7. 

C  FOR  OATA  PREPARATION  FORMATS) 

C  COL  SI  TO  60  BETA,  NEWMARK  INTEGRATION  PARAMETER  IIMPLIC1 

C  COL  61  TO  70  OEL  ■  GAMMA  -  0.5,  NEWMARK  INTEGRATION 

c  PARAMETER  IIMPLIC) 

c 

C  CARO  2.  1215, 7F 10.01 

C 

C  ONE  FOR  EACH  NPROP.  SEE  SECT. 7. 3  FOR  OATA  PREPARATION 

C 

C 

C  SUBSEQUENT  CAROS  FOR  EACH  TIME  STEP  IN  THE  SEQUENCE 

C 

C  FORCE  CAROS.  SEE  SECTION  7.  FOR  OATA  PREPARATION  FORMATS. 

C 

C 

C  9.)  OUTPUT  CONTROL  FOR  LIMITEO  PRINTS 

C 

C  DISPLACEMENT  OUTPUT  CONTROL,  IF  IOUT  .NE.  0, 

C 

C  CARO  t.  115) 

C 

C  COL  I  TO  5  NUMOIS  -  NUMBER  OF  DISPLACEMENT  PRINT  CARDS 

C 

C  SUBSEQUENT  CAROS  (215)  SKIP  IF  NUMOIS  -  D 

C 

C  COL  I  TO  5  NODAL  NUMBER  TO  BE  OUTPUT. 

C  COL  6  TO  10  HIGHER  NOOE  NUMBER  OF  A  GENERATED  SEQUENCE, 

C  IF  ZEPO  JUST  FIRST  NOOF  IS  COUNTEO. 

C  COL  11  TO  15  INCREMENT  TO  GENERATOR,  OEFAULT  «  I 

C  •••  REPEAT  UNTIL, NUMOIS  CAROS  HAVE  BEEN  REAO 

C 

C  STRESS  OUTPUT  CONTROL,  IF  (OUT  .NE.  0. 

C 

C  CARO  1.  U5,5X.7tl) 

C 

C  COL  1  TO  5  NUMSTR  -  NUMBER  OF  STPESS  OUTPUT  CARDS 

C  COL  II  TO  17  NSIG17)  -  PRINT  PATTERN  WITHIN  AN  ELEMENT. 

C  LOCAL  POINTS  OF  EACH  ELEMENT  CAN  BE 
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PROGRAM  FEAP73I  INPUT- 101  .OUTPUT  , PUNCH- 101 ,  PUNCMB  »  101 ,  T  APE  )  t  •  1 01 

X  ,  T APE 4- PUNCH, T APE 5-  INPUT  ,  T APE6-0UT PUT , T APE7 , T APE  $ , T AP E9 , \ A  PE i 0 , 

X  TAPE11,TAPE13,TA0E14,TAPEBB-PUNCHB  ) 

C 

C....  FINITE  ELEMENT  ASSEMBLY  PROGRAM  •  STORAGE  ALLOCATION 
C 

COMMON  OT I  6000 1 
C 

C»44-  ISZOT  MUST  COINCIOE  WITH  SIZE  OF  ARRAY  OT 
C 

ISZOT  ■  6000 
C 

C»*»*  REASONABLE  MAXIMUM  BAND  WIDTH 
C 

MBANO  •  100 

CALL  FELMT  I  OT , I SZOT , MBANO  1 

STOP 

ENO 


PETURN 
T  NO 


PAGE  l 7 


PAGE  1R 


SUBROUTINE  FE LMT ! OT . 1 S?OT , MR ANO) 

MAIN  ASSEMBLY  PROGRAM  ANO  STORAGE  ALLOCATION  FOR  VARIABLES 
REAL  LABL 

LOGICAL  CHECK .FLAG.NPL 

DIMENSION  CONWDI 24 | «  f LAGI 7 ) »  TITLE ( )2I , I YME I  7  I , DTI  I SZOT I , R El  2 1 
COMMON  /TAPES/  ITP5.1TP6 
COMMON/  FOR  I  ER/NH50I.XN,F1,F2,F3,F4 
CCMMDN/GAUS/  LIM,SOAUSS|5,5l .WGAUSSI5.5I 

COMMON /LA  BEL  S/  L  ABL  I  fc  I ,  XHEO I  3  I ,  AH,  FHEO  )t  I  ,CH ,  ijHEOI  6  I  ,  UH .  RHED  1 6  I ,  RH 
x  ,  A  WORD  1  •  AW0R02.  AW0R03.HFA0U2I.START,CEASE,  IPG, NS  I R , MORD I  30 1 
COMMON/ SNAP/  XJAC, SHAPEI4.2  0I ,$GI3,3I .SKI  3,3) ,X13,201,L0! 1201 
COMMON/TITLES/  XT TL 13  I  ,UTTL 1 6 ) 

C OMMON /VALUES/  NC  1  .CONl  ,C0N2 , CQN31  3) 

COMMON/DYNAMO/TIME  ,NS  l Gl  7  I  ,  NT  ,N5TEP , OS  , NU«PL  T . N6  DA  T  Al  20 , 3 1  ,  NPR  , N PL 
OATA  CONhO/6hmaTEMI  ,f.HNOf>AL  .6HP0LAR  , 6HELEM5N, 6HS0LVE  .6HRES0LV, 
l  6MB0UNDA  ,  6I<F  ORC.e  ,  6Hflt  OAOS  ,  6HEL0A0S .6HVECT0R  ,6HMESH  ,6HPL0T  , 
6HF0U«  )E,6HRF.MA«<,6MINITIA,6HGENERA,6HTI  TLE  ,6H8L0CK  ,6HEXPt-IC, 

X  6H AODUp  ,6HVl  $C0E,6H|MPLIC,6HNEWT0N/ 

OATA  RE/4HN0T  ,  4H  /,  BLANK /6H  / 

OATA  NFLAG,NUST/7,2A/,Ml,M2,M3,K<,,K5,M6,MB/7*I/,lTA/9/ 

*♦  INITIATE  SEARCH  FOP  START  OF  PROBLEM 
00  REAOI I TP5.I000I  CC.HEAO 
CC-HFAOI 1  I 

If  ICC. EQ. START!  GO  TO  2 AD 
IFICC.ED.6HFEAP73I  GO  TP  2A0 
IFICC.ED.CEASE1  RETURN 
GO  TO  100 
CONTINUE 
00  122  1-1.12 
HcAOl 1  I  *  T I TLEI II 
'.D  PEAOIITPS,  JOOOI  CC, TITLE 
NO  I M  -  CC 
00  ISO  I  -  1 • NO 1 M 
Cl  -  TITLE!  II 
XHfcOI  1  I  ■  CC 

IFICC.ED.BL ANKI  XHE0I11  ■  XTTLII1 
>  CONTINUE 

REAOI I  TPS, 10001  CC, TITLE 
NDF  •  CC 

00  152  1  -  1  » NOF 
CC  -  T  I  TLE  III 

IF (CC.EO. BLANK!  CC  ■  UTTLIJI 

FMfcDl I  I  -  CC 

UHEDIII  ■  CC 

RHEOI | I  «  CC 

NUMEL  ■  D 

RE  AO  11  TD5, 10011  NEN.NEXTPA, |R EC, MB AN, 1  BUF »NC I , CONI ,CON2,CON3 


IFIMBAN.LE.OI  MBAN  ■  MBANO 

1 S I  7  ■  I SZOT 

1 OT  «  1SZDT/2 

HI  CO  ■  0 

NVEC  «  D 

NPL  •  .TRUE. 

NUMPLT  ■  0 
NT  ■  l 

C.... INITIALISE  TYME  AND  CLOCK 
CALL  TICTOCITYME.OI 
00  121  1-1,7 
121  TYME I  1 1  “  0.0 
NEL 1  ■  NPN  ♦  2 
REWINO  12 
NTERM  *  0 
DO  10  1-1, NFL  AG 
10  FLAGII )-. FALSE. 

C 

C....  STORAGE  IS  SET  FQP  A  NS TF  X  NSTF  ELEMENT  MATRIX  AND  FORCE  VECTOR 
C....  MAXIMUM  SIZE  FOR  NSTF  IS  120,  THIS  IS  CUNTROLED  BY  DIMENSION  ON  ID 
C 

NSTF  ■  NOF-NEN  ♦  NEXTRA 
M9  «  2*NSTF  v  1 
MO  •  NS  TF* I NSTF+2 I  ♦  1 
I F I  MO  .GT.  I OT  I  GO  TO  710 
IPG-I 

1FIIBUF.LE.0)  I BUF  ■  ISZ0T/20 
1FI  IREC.NE.DI  IREC  -  1 

WRITE  I ITP6.2000I  HE AO, I PG, NO  I M, NOF.NEN, NSTF, RE  I IREC* 1 1, Mb AN,  I  BUF  , 

X  NCI, CONI, CON2.CON3 

IPG  ■  IPG  ♦  I 

IFINOIM.GT. 3.0R.N0F .GT.6.0R.NEN.GT.20)  GO  TO  720 
C 

C....  SEARCH  THE  LIST  OF  NAMES  FOR  A  TRANSFER  AOORESS 
C 

125  REAOI 1TP5 , 1  000)  CC, TITLE 
l  •  CC 
CC-T1TLEII) 

00  126  J  -  1 , NL I  ST 
I F I CC • EQ. C0NW01 J ) I  GO  TO  127 

126  CONTINUE 

1  F  ICC. EQ. START  I  GO  TO  120 
IFICC.EQ.6HFEAP73I  GO  TO  120 
IFICC.EQ. CEASE)  RETURN 
GO  TO  125 
C 

C....  NAMESIMAT,N00,P0L,ELE,S0L , «>E  S ,  BCS,  FOR,  BL 0,  ELO,  V EC,  MES  ,  PlU,  FQJ  ,  RE  M, 

127  GO  TO! 210,220,226,230, 200,270,2 28, 260,2 50, 255, 24 5, 200, 200, 2DO,131, 
X  3A5, 220, 133,220, 200. 200,  200, 200,200)  ,J 

C....  ICO, GEN, TIT, BLO,  EXP, AOO , VIS, IMP, NEW! 
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I  3 1  WRITEI  I TP6,  2003)  I  T I  TIE  I  I  1 , I  -  2, 1 2  I 
GO  TO  125 

3  00  134  I  ■  2, 12 

4  HE  ADI  I  I  ■  T  I  TLE  I  I  I 
GO  TO  125 

...  INPUT  THE  MATERIAL  CHARACTERIZATIONS. 

0  J  »  1 

IF  I  FLAGII | |  GO  TO  215 
FLAG! ) I -.TRUE. 
ini.LE.OI  GO  TO  7 00 
MJMMAT  ■  I 
MI  •  MD 

M?  «  MD  ♦  N'JMMAT 
MD  -  MO  ♦  64  *NUMM A  T 
IFIMO.GT.ISZOT)  GO  TO  710 
ALL  MESH!  j,NUMNP,NUMEL,NUMMAT,NQIM,NDF,NEN,NELl, 

*  OT,  f)T  I  Ml  ),  0TIM21 ,0TI“3|,DTIM4I  ,0TIM5)  .0TIM6I  1 
in  IPG.LE  .01  GO  TO  10D 

GO  T0  125 

...  INPUT  T hp  NODAL  LOCATIONS  AND  BOUNDARY  CONDITION  COOES. 

I F ! CL AG  1 2  I  )  GO  TO  225 
FLAGI2I-. T«uF. 

IMI.LE.OI  r.Q  TO  70D 
NIJMNP  -  I 
M3  ■  MO 

m<,  *  MD  *  NUM.NP 
MB  ■  M4  f  NO  I M-NUMNP 
MD  •  M5  »  NDF*NUMNP 
(FIMO.GT.I SZOT)  GO  TO  MO 
If  ( .NOT. FLAG! 31  I  M6  -  mq 
«-  CONTINUE 

IF ICC.ED.CONWDI 191  I  GO  TO  227 
J  -  2 

I F ICC. SO. CONWOl 17)1  J  -  4 
GO  TO  2)5 

t,  1  c  I  •  M0T  •  FL  AG  I  2  I  I  GD  TO  730 

CAM.  CONVE11  Tl  NiJMNP  ,NPI  M,DT  |  M4  I  I 

GO  TO  125 

T  continue 

CALL  BRKOENI  NUMNP,  NU“EL  ,ND!M,NDF,NEN.NEL)  .OTIMJI.O  I  M4  I  ,  0  T  I  M5  I  , 

*  0IIM6I) 

IF  I  |PG.l F.OI  GO  TO  7D5 

IH  .NOT.’  L  AGI3I  I  *D  -  *0  •  NFL  1*NUMEL 

MAGI  3 1  •  .TBUt. 

If  IMO.GT.  IS  ZDT  I  GO  »f*  7  IP 
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GO  TO  125 
C 

C....  BOUNOARY  COOE  OVERWRITE 
C 

22B  1 F I .NOT .FLAG  12 ) )  GO  TO  730 

CALL  BCOOESI NUMNP,OT I  M3 ) I 
GO  TO  125 
C 

C.M,  INPUT  THE  ELEMENT  CONNECTION  ARRAY. 

C 

230  J  ■  3 

IFIFLAGI3I)  GO  TO  215 
FLAG! 3) TRUE. 

IFI1.LE.0)  GO  TO  70Q 
NUMEL  ■  1 
M6  ■  MO 

MO  •  MO  ♦  NEL  1*NUMEL 
GO  TO  215 
C 

C....  INPUT  THE  VECTORS  OF  PRESCRIBED  VALUE. 

C 

245  I F I .NOT .FLAG! 2  I  I  GO  TO  730 
IFII.LE.OI  GO  TO  700 
I F I FL  AG  I  4  I )  GO  TO  247 
FLAGI4)  «  .TRUE. 

REAOI  1TP5, 1001)  NSIZV.mCK 
NVEC  ■  I 
MB  -  MO 

MA  ■  MR  ♦  NS  I  Z V* I 
MO  ■  MA 

)F|M0*2*t.GT.1SZDT)  GO  TO  710 

247  CALL  VECIN  INUMNP,  NU“FL , NOF, NS1  ZV, IP  ICK ,NVEC, DT I MA I , OT I  MB)  ) 
IFItPG.LE.O)  GO  TO  100 
GO  TO  125 
250  CONTINUE 

I F |  I.LE.D)  GO  TO  125 
C 

C....  INPUT  BOUNOARY  LOAOS 
C 

CALL  BLOAOSI I , NUMNP,  NOI M , NO F, OT 1M3 1 , 01  I M4 ), DTI  MS) I 
I c I  1 pG  .LE.  01  GO  TO  705 
GO  TO  125 
C 

C....  INPUT  ELEMENT  LOAOS 

C 

255  IF  <1  .LE.  01  GO  TP  125 

CAU  EL  OAOS!  I  ,  NOI  M ,  NOT ,  NCN  ,NFL  l  »  NSTr  ,  NS  I Z  V  ,  NVf.C  ,  OT  I  M 1 1 ,  OT  I  M2  1 , 
l  0TIM3I  ,0TIM4I  ,DTI  MM  ,0’!  MS)  ,DT,DTIM'3|  .DTIMHIJ 
1MI0G  .LE.  D )  GO  TO  70S 
GO  TO  125 
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lN’JT  THr  INITIAL  CONDITIONS 

|»  IHAultll  GO  TO  1  AT 
»IA  .1*1  •  •  f’Uf  • 

NUO  •  1 

NS  ICO  •  NO^NUNN’ 

Mf,  •  NO 

nc  •  ng  •  nicd»nsico 
*r.  •  mo 

M)N0*2*l.GT.IS20TI  GO  TO  7 1  D 

7  (ill  VIC  IN  INUNN’.NU’El ,NOF  ,  NSI  CO ,  l  ,  NI C  D ,  0  T I  NC  I  ,  OT  I NGI I 
1FI)’I..LE.0I  GO  TO  100 
GO  TO  |25 

...  START  THE  SOLUTION  *  I ■ S  T  LOADING  CASE 

•  0  IT  I'lAGmi  GO  TO  AOl 

CHUf.TAj*. 

CALL  TICTOCITVNE.il 
00  121  J* I  * ) 

IH.NDT.fLAGI  III  CHEf*..*‘LSf. 

1  CONTINUE 

l»  I  .NDT.CHECM  GO  TO  TOT 
NTH  .  0 

If  ICC.NE.CDN40I22I  .ANO.CC.NE.CONNOmi  I  GO  TO  515 
.  .  SET  UP  V I  SCOEl ASTIC  2NDNL I NE  Ai  SOLUTION  CALL 

NTH  •  1 

NSEO  •  I 
1*0 

I  SI  2  •  ISZOT  -  IflUf 

ioi  •  I s ( in 

If  INCCO.NE.OI  Gu  TO  MB 
HA  I  ft  1 1 TP6. 20301 
NlCO  •  l 

If ( CC .EO.CQNWOI 2)  I 1  NICD-I 
NS  ICO  •  N>F*NUNNP 

HO  MO 

-0  NO  »  MCOVNSICO 
If  (NO.GT.ISin  GO  TO  7J0 
no  510  J  •  HG.NO 
U  OTUI  .  o. 

5  M7  •  HO 

N  7  A  •  HO 

If  C I0T.GE.N7I  NT  •  |0T  %  I 
HU  ■  h| 

IOI  •  IUT  »  l 
HO  •  H7  ♦  NOf«NUHNP 
IflNJ.GT.ISm  GD  TO  710 
MB  •  NO  I 
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0  C  1  H  7  A  J  •  0MN7I 

H7  »  M7A 

i  IA  •  NT  ♦  J  •  1 

MU  ■»  LA  •  NDEG*MAXHAN 

“I  «  HU  »  NUNN»*NOf 

MO  •  MX  ♦  NDEG 

ioi  •  noi*g#naxsan  »  i 
10  f  L  A G | 5 1  '  .TRUE. 

I f I N T N , EJ. I  1  GO  TO  520 

CALL  rOPNST  INIINNP|MJNEL  .NUMNAt.NOl  N,  NOF  .NEN.NtLl.NB.OT.OTINil, 
t  OTIHJI ,0TIN1).0TI“Al .0TIN5I .0TIM6I ,OT,OT IM9I.0TIH7I  .OTIHBI, 

X  DTINUI  .OTI  LAI  .NSTF.IBLK.NVFC.NSIZV.NAXBAN,  IREC.NOEGI 
r  ALL  T|CT0C1TVNE,1I 
If  I  IPG  ■ LE ■  01  GO  TO  70S 

..  f  OP  H  THE  GLOBAL  STIFFNESS  AND  SOLVE  USING  GAUSS  ELIMINATION 

LAU  SOLVFOINUNNP.NUNEL.NOF,  I  0 1 ,  NT,  N  AX0AN  ,  ITA.NSTF  , I  SI A , NEQB , I BlK, 
X01 IlAl ,OT«NS| ,0T I  MU  I, DTI  *7 1 ,0T,0TIN9|,0TIMKI  .NOEGI 
AIL  TIC  rOCI  TVNE.Sl 
GO  10  A20 

.  OVNANIC  SOLUTION  BV  FXPLICIT  INTEGRATION 

15  | F I N ICO  .rf.  31  GO  TO  Al* 

UR  I TE I )TF  6 , 203B) 

Niro  •  3 

NSICD  •  NDf*NUNNP 
NC.  MO 

NO  *  NO  ♦  N l C 0*NS ICO 
|P |H0  .Of .  ISIOTI  GO  TO  710 
on  ‘■.17  J-NG.HO 
« I  T  OT I JJ  •  0.0 
•  lb  mg  -  MG  ♦  NSICD 
HD  •  NC  »  NS  ICO 
Nt  •  mo 
Mf  .  NF  ♦  NSTF 
NO  •  2*N5TF  ♦  NF 
IFINO  .GT.  ISIOTI  GO  TO  7J0 

CALL  FXPLCT  |  NUNNP.N'JNEL.  NUNNAT.NO  IN,  NOF  .NEN.NEL  1  ,NSTF  ,NVEC,  NSI I V, 
X  OTINl>,OT{N2),OT|Nn.OT|HAI  «0T  )N5  I  •  Oil  N6 1 ,  Of  IN7 1 .  OT)  1 1 1 01 1 N9 1 . 
x  OTINBI.OTINGl.OTINCI .OTINDI.DTIHEI .OTINFI .TYHfc , IOUT.NSICOI 
no  TO  125 
m  IDUT  •  I 

CALL  IICTOCITVNE.il 

....  *0«H  THE  NEW  LOAD  AND  00  A  RESOLUTION  ONLY 

CALL  RESVEOINUNNP.NOf .Hi  1 , NAXBAN, I S I A . NE OB. I BLK . OT I L A I , OT I H5 I , 

X  0TINU1 ,0TIN5l.0T|N7|,nT|NX|,N0F*NUNNPl 


C 

C..».  CHECK  THf  NC Sh  fO*  CONSISTENCY  DF  INPUT  0A1A 
C 

CALL  NtSMC.R  I  NUNNP.NUNfL.NUNNAT.NO  IN,  NOF  . NFN.NEL  I  .  I  UT  ,  I  0 )  ,  MB,  NA  IB  AN 
X.DT.DTINI) ,0T(M2I,nT)N)),0T)NN) ,OT)N«),OT)NTI,  1SIA.NE0B, 1 BLK, NOEGI 
N  V  >  1 01  -  NE  QB 
C 

C....  PLOT  THE  MESH  FQ A  TWO  OJNFNSIQNAL  TOPOLOGIES, 
r 

.01  I  OUT  ■  I 

1 F ) I  .NE.  D)  MM | TE 1 1 T’6. 2039) 

IF  ICC •EQ.CDNMDl 1311 

1  CALL  ’LDTHSHINUHNP.NUHFL.NOI  M.NEN, NELI.OTINAI,OTIMM.|) 

CALL  TICTDCITVME.21 
1F1CC.EQ.C0NM0I2AI)  NSIQ-I 
IF lCCaEO.CDNMDI 2 A) I  GO  TO  520 
IF  ICC  .EQ.  C0NMD  20II  GD  TO  A|5 
1FIMAIBAN.GT.MBAN)  GO  TO  7A0 

|F)CC  • EG*  C0NM0II2)  .DA,  CC  .EQ.  C0NMDI13I)  GO  TO  125 
IFIl’G  .LE.  01  GO  TO  705 
I F ICC.N6.CDNM0 I ) A) I  GD  TO  A05 
C 

C....  FOUR  IE  A  COMPOSITION 
C 

REA0I1TP5, 10021  J,F),F2.F3,FA 

MAI  TCI 1TP6.2002I  Hi  AO, | ’G, J ,F 1 ,F2 .  F 3  ,F  A 

IPG  ■  I’G  ♦  l 

NTERM  •  NTERM  *1 

nfinteami  •  J 

XN  ■  J 
C 

C....  FORM  THE  STIFFNESS  FOR  THE  ELENENIS 
C 

A05  I F 1 FL  AG  1 5 1  I  GD  TO  A10 

LA  -  1 

J  ■  IMAKBAN*) )*NOEG  ♦  N0F»NUMNP»I1  •  NTMI 
IF11SI2-J.IT.H7A)  GO  TO  A 10 
C....  DNCDRE  SOLUTION  IS  POSSIBLE 
MRITEI1TP6, 203)1 
NEQB  -  NDEG 
1 BLK  •  0 

C....  CHECK  TO  SEE  IF  |DEST  IS  TO  BE  NOVEO  UP 
J  •  NUNNP’NDF-1 

C....SAVE  FORCE  VECTOR  FOR  NONLINEAR  SOLUTION 
MKhN5»J 
AEM1N0  9 

MR  1 TE I  9) ) OT | I ) , I «H5 . MX I 
I F INT.EQ.HTA)  GO  TO  A09 
00  AOB  K  ■  1.J 
AOB  DTINTAtKI  •  DTIM7»K| 
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CALL  7 ICTDC I T VME, 5  I 
A  20  MR) TE I ) 21 IDTINI .N-MT.HBI 

C 

C....  COMPUTE  AND  OUTPUT  THE  NDOAL  DISPLACEMENTS  AND  ELEMENT  STRESSES 
C 

IF  I IREC.GT.O.ANO.IBLK.EQ.OI  REMIND  7 

CALL  01 STRSINUNNP, NUNEL.NUNMAT.NO IN, NOF,  NEN.NEL l, NSTF .NVEC.NSIZV, 

X  OT|Nll,OTIN2l,OTIN3l,OT|MA|,OTIN5l,OT«N6),OTIMUI,OT,DTlN'M,i)r|M(iI 
K i 1  OUT  *  I REC .  I BLK I 
CALL  7ICT0C CTYME.6) 

IF  C IBLK.GT.OI  REMIND  7 

IF) I BLK .GT . 0 1  RE AO  1 7 ) IOT I  I ) ,1-I.NB) 

I  ■  0 

MPITEIITP6, 20301  7VME 
00  271  N  -l,  7 
271  TVNECNI  -  0.0 
C 

C... •  INPUT  THE  FORCE  VECTORS  ON  NOOES  IRESET  TO  IERO  AUTOMATICALLY 
C....  AFTER  EACH  PROBLEM  SOLUTION  DR  RESOLUTION!. 

C 

2GC  CONTINUE 

|F| .NOT. FLAG  121  I  GD  TO  730 
CALL  RESET) I.NUMNP.N0F.DTIN5I I 
GD  TO  125 
C 

C....  TINE  INTEGRATION  SUBROUTINE  FOR  OYNAHIC  AND  VISCOELASTIC  SOLOMONS 
C 

520  I F ( FLAG) 7  I  I  GO  TO  5A0 

FLAGI7)  •  .TRUE. 

I  -  NO  *  NS  1C  0  -  l 
IF! t.GT.ISlII  GD  TO  710 
00  530  J  •  NO,) 

530  OTUI  -  0. 

IFITBLK.EO.OI  GD  TO  5A0 
HU  •  HO  ♦  NSICD 
lFINUtNSICO.GT.ISlII  GO  TO  710 
5 AO  1FICC.EQ.CONM0122I.OR.CC.EQ.CONMOI23I  I 

X  CALL  TSDLVEINUNNP.NUMEL.NUNHAT.NOIN.NOr , Nt N,  NEL I . NST f ,NVEC, 

1  NSIIV.NICO.NSICO, IBLK, ISIA.NEQB.NAXBAN.NOEG. IOI ,M3, I IUF.01. 

2  OTCMII  .DTIM2I  .DTIM3I  .OTIHAI  .0TIN5I  ,0T  |N6I  ,DT  IMT  I.OTI  Mill, 

3  0T,0TIN9l,0f I  ML  I, DTI  LA  I , OT I  NO  I ,  DT  I  Nx I ,OTI 1  SI  I* 1  I , 0 T I  MG  I  *U 1 1 « j  |  , 
A  NSEQ.TYNEI 

IFICC.EQ.CDNM0I2A) I 

XCALL  NEMTDN  INUMNP.NUNEL, NUHMAT.NOIM.NOf.NcN.NEL I.NSTf .NvEC.NSIlY, 
II  BLK.ISIA.NEQB.MAKBAN.NOFG,  IOI  ,M8  .  I  BUF  ,  OT  ,l)T  INI  I  .0  T  (  M2  I  ,  OT  I  m  ,  j  , 

201 INAI  ,01 IH51 ,0T(H6),0T(«T)  ,OTI  NBI ,  DT ,  DM  M9 1 ,  DT  I  Ml  I  ,  0  U  L  A 1 .0  T I  NOI  , 
30TIMX1.DTI I  SI !♦ 1 I.OTINUI , NSEO. T VME  | 

I  -  0 

GD  TO  260 

C....  PROGRAM  EXEC^TDN  TYHE  ARRAY, REFFRENCE  SUBROUTINE  CLOCK 
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2>.  7 


705  MM  I T  F ( t  TP6 ,  20)0)  TYNr 
GO  TO  100 

7  «RITEIITI»6,2033MFLAGU>,J*1,3) 
oo  to  loo 

700  wRl 1EI ITPb, 20341  CC 
CO  T  3  100 

MO  WMTEI  ITP6,  20351  10ilSU.CC 
GO  TO  100 

720  MUTE1ITP6,  20361  NDIM.NOF »NEN 
CO  TO  100 

I  40  mR|  T  E  ( I  TPfc.  203T1  CC 

r,u  to  ioo 

5  WRI  TEC  I  TP6.203AI 
r.o  TO  100 

0  WRITEIITP6, 20321  MAX BAN 

CO  TO  100 

*  •  • 

«•*  FORMATS 


2032  FQ1MRT  1 2TM0SAN0W I  OTM  FXCEEOEO,  MPAN0H5I 

2033  FQRMAT15SH0RLL  INFORMATION  FOR  THIS  FROILEM  HRS  NOT  8FEN  MO  VIDE  0/ 
X  I5H0MRTERIAL  CAROS  .  12/ 

X  1SHONOORL  CAROS  .  12/ 

X  1*m0ELEMENT  CAROS  *  12/  » 

2  J34  FORMAT ISX.A6.I6H  TYPE  CRRO  ERROR/! 

2033  FORMAT  (20H0REUUIRE0  STORRCE  •  I T/20H0AV*  I LABLE  STORAGE  •  I  V 
X  25H0ST GRACE  EXCEEDED  DURING  *A6/I 

2036  FORMAT! 20H0 INPUT  SUE  ERROR.  *»H  NOIM  •  ,13,IH,  NDF  •  .IS, 

C  IH,  NEL  •  .13) 

2037  FORMAT ( I IHQRT TEMPT  TO  INPUT  .R6.20M  BEFORE  NODAL  POINTS  I 

2031  FORMAT! SX.  9»H**N0N-F AT AL  ERROR**  INITIAL  OVNAMIC  VECTORS  HAVE  NOT 
X  SEEN  INPUT  ••INITIAL  CONDITION  ASSUMED  ZERO  I 
203R  FORMAT  IA3H0RE0UEST  MADE  FOR  LIMITED  AMOUNT  OF  OUTPUT, 

X  ,23M  ADDITIONAL  OATA  REOUIREO/UI 
ENO 


JO  FORMAT  IF3.0, IX.12A6) 

01  FORMAT16IS.5FIO.OI 
J  2  FOPMATI I5.5X.4F10.0I 
GO  F0fJMRTl»Hl,»2A6,30X,4HPAGE.  14//// 

X/19X.32H  FINITE  ELEMENT  ANALVSIS  PRDGAAN///I 3X,  22I2H  •»  // 

X  I3X.2H  *,I«,34H  OIMENSIONRL  PROBLEM  ••••••// 

X  13X.2H  • , l fl , 34H  DEGREES  CF  FREEOOM  PER  NOOE  •  •// 

X  13X.2H  • . I  6. 34H  NOOES  CONNECTED  TO  EACH  ELEMENT  •// 

X  I3X.2H  •«10. 34H  ELEMENT  STIFFNESS  SUE  •  •  •  •  •//13X.22I2H  •!// 
X  I3X.2H  • » 8X»  34H  A  GENEPAU2E0  FORCE  CHECK  HRS  •  // 

X  I3X.2H  • , 9X , A4, I  4HRE  FN  RE  OUESTEO,  1 4X,  1H*// 

X  1 3X. 2H  • . I  6 , 34H  tS  MAXIMUM  PERMISSIBLE  HALFBANO  •  // 

X  13X.2H  • , I  6. 34H  WORD  BUFFER  AREA  RESERVEO  FOR  H  •//I3X.22I2H  •»// 
X  13X.2H  •  i  BX. )  8H  CONSTANT  NCI  — -  -,I8,7X,IH*  // 

X  13X.2H  •.BX.tSH  CONSTANT  » -  ••EI2.4.4H  •// 

X  13K.2H  •.BX.lflH  CONSTANT  2 - •.EI2.4.4H  •// 

X  I3X.2H  • »  B  X , (OH  CONSTANT  3 - -,EI2.4,4H  •// 

*  13X.2H  *, 8X» 18H  CONSTANT  4 -  -.E12.4.4H  •// 

X  13X.2H  • . AX, IBM  CONSTANT  5 - ',E)2.4,4H  •//I3X.22I2H  •  )/» 


02  FORMAT! l H 1 « ) 2 A6 . BOX . 4HPAGE • l 4 / / 

X  5X.37HFOUR1ER  COEFFICIENTS  FOR  HARMONIC  NO.  ,  14// 

X  10X,  25HRA01AL  COEFFICIENT  •  EI2.4// 

X  10X,  25HTANGENTIAL  COEFFICIENT  ■  E12.4// 

X  10X,  25HAXIAL  COEFFICIENT  •  E12.4// 

X  10X,  25HTHERMAL  COEFFICIENT  -  EI2.4//  I 

0)  FORMAT I/20X, IIA6) 

0  30  FORMAT  ItHl,2lX,l2MELAPSE0  T I  ME/// 10 X, 25H INPUT  PROPERTIES  ANO  MESH 
,F10. 1/10X.25HCHECK  AND  PLOT  INPUT  OA T A ,  F  1  0. 3/ 1 OX , 1 4HF0R M  STIFFNESS 
.F21.3/IOX, 21 H SOLUTION  OF  FOUA T I ONS ,  F |4. 3/ tO> , 23HRE SOLUT 1  ON  OF  EUUA 
,T 10NS.F 12. 3/10X, L4H0UTPU*  ANSWERS, F2 » . 3 / 1  OX » 1 OHTOT AL  TIME.F25.3  1 
3 1  FORMAT  I / /  5X, 16H1N-C0RF  SOLUTION  l 
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BLOCK  DATA 
PEAL  LABI 
LOGICAL  NPR » Npl 

ta«.13N/n*N*HO/ri»P,NMC.l7l,NI.N5IEP,OT,NUMPU,NEO»T*UO,ll,NPR.m>l. 

CO“MON/GAUS/  LIM, SGAUSSI5, SI»WG*USSI 5,51 

COMMON /LAB ELS/  LA3LI61.XHF0I3I.XH.FHE0I6I .FH.UHE0I6I ,UH»  RHE0I6I , RH 
X  ,  AWQPD1,  AMQR02,  AMCIR03.HEA0I  l  21.  START.CEASE,  I  PG  .NS  IR  .WORD!  30) 
COMMON/SHAP/  X i AC  .  SHI  -E 1 4 , 201 ,  SGI 3 , 3  l ,  S* !  3 , 3 1 » X !  3,  201 , LO!  120 1 
f  OMMON/T1TLES/  XTTL'  n.UTTLltl 
COMMON  /TAPES/  ITP5.ITP6 
CDMMQN/VTAPE/  1  TPI 3. 1 TP14 , 1 T^RO. I TPWR 
OATA  SHAPE /8O*0 .0/ , ST  APT , CEASE/6HFEA P73.6MSIOP  / 

OATA  W0R0/5HELM01. 5HELM02, 3HELM03.3HELM04.3HELM03,  5HELM06. 5HELM07, 
x  1jHFLM0B»5HELM09.,jHELM10.5HELMI1,5HELM»2,5HELM»  3,  SHE  L  Ml  4,  SHE  L  Ml  S  . 

X  5HFLM16.5HELM17.5HEL «1 6, 5HELN19,  SHELM20. 5HEL M2  1 . 5HELM2  2. 5HELM23, 

X  5HrLM24,5HELM25,5HHM26,5HELM27,5HELM28.5HELM29.5HELM30/ 

OATA  SGAUSS/5*0..-. 57735027,. 57735021, 3*0., -.71459661.0.,. 11459667 
C  .2*0.  , -. B611363I , 3399R104, .33998104, .861  1363  I .0 ., -.90617985, 

C  -•  ‘>384  69  31 ,  .0,.  S3  846  931  * • 906 179B5 / 

OATA  WGAUSS/5*2. ,5*i. , .5555*356,  .  8BB BB 889 , • 5 555 55S6 , 2*0 .  ,  .34 7854 8S 
r  f  ^•.652l‘*5|5,  .347854  95,0.  ..2  3692689..  4786286?,  .568B8889..  47862367 
f  , .23692659/ 

OATA  LA3H11/BH  1112,  / 

DATA  XTTL/6H  1 , 6H  2»6H  3/,  XH/6H  ORO.  / 

OATA  UTTL/6H  1.6H  2.6H  3,6H  4,6H  S,6H  6/ 

OATA  FH,RH,UM/6H  FORCE, fcH  FORCE, 6H  OISPL/ 

DATA  AM0R01 » -M0R02/BH  F13.4..BH  6E13.4I/ .RW0R03/8H  F|i.2,/ 

DATA  1TPS.UP6  /5»  6/  ,  N S IG/7* 0/,  T  IME/O.O/.NUMPLT  .NPR.NPl/O.O,  1/ 

DATA  |TP13,1TP»4/I3.l4/ 

ENO 


SUBROUTINE  TICTOCUVME,  11 
C 

C  SUBROUTINE  TO  TIME  PROGRAM  SEGMENTS  AS  MEASURE  OF  EFFICIENCY 
C 

0 1 ME  NS  I  ON  TVMEI7I 

IF  I  I  .IE.  0)  GO  TO  100 

CALL  SECOND  I T 1 1 

TYME  III  ‘  T1  -  TO 

TYMFITl  •  TYMEI7I  ♦  TYMEI II 

TO  •  Tl 

RETURN 

100  CALL  SECONOUOI 
RETURN 
ENO 
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SUBROUTINE  INlEGLIUM,NCl,NO|MtLINT,STUWl 

01  MENU  ON  STRU7,1),TTRll7,l),UmiT*9I.WTRll?*JI.STUW|4,ll 
01  ME  NS  ION  S 1*  IT1*T1B1TI*U|R1T  I  »WB1 21  »SA12 1  *MC4  21 1  SCI  21 
COMMON/GAUS/  L2f,SGAUSSl5,51.wGAUS5n,51 

COMMON/IABILW  lA0LUI,XH|ni)l,XM,FHEOl4).FH.UMEOl6l*UM,RMCD14l,RH 
X  ,AwO*Dl,AyOBD2,AWOAOl,HEAnil2l.STA0T,CEASE,lPU,NST0,WOROlSOl 
OAT  A  STRI/O.  3 3)133)1, 4*0.  ,0.5  .0.0* 0.9, 4*0. 0*0. 3331)))), 0.  09971517, 
f  2*0. 47014206.  0.7974  2699,2*0. 1012 0451/ 

OAT*  TTR1  /O.  DID D)»  6*0.0, 2*0.5, 0.0, 4*0.0* 0.11 1)1)3 3*0.4  7014204, 

C  0. 0597 15BT,Q,4T014  206,0.  10  1 2*611,0.  797*241  «iO.  1012  Mil  / 

DATA  UTR I/O .11111111* 4*0.0* 0*0*  2*0. 1,4*  0.0*0.  1111J  111*2 *0.4T0» 4206 
C  « 0.0197  HIT*  2*0.10121411  *0*79742499/ 

DATA  MTAUT*  1.0,  7*0. 11311111.  0.221*  1*0.  1 12194  11, 1*0. 12191111/ 

0A1A  V10,TI*,UI«/1.0, 2*0. 0,4*  1.0*0.*  1 .  *  0.  *  2*  1 .  *  - 1.  .  “1 .  •  0.  *0. ,  l .  .  1. 
C  ,  - 1. • -1. •  1.  / 

DATA  wl, IB, MC.1C/ 1.111 11 11*0.  816424191*1. 0*0.791 12 2426*0.* 
t  0.1111 80 01 1,0. 0,0. 711716911/ 

.  •»  1NTFGB AT  ION  TABLE  CONSTRUCTION 
IF1NC1.LT. 01  NCI  •  0 
1HNC1.GT.21  NCI  •  2 
NC  •  NCI  •  1 
C.U  10  1241, 24*.  2*91  , NC 
»•  NCI  •  0,  GAUSS  INTEGRATION 
.1  II  •  0 

IFILIN.LT.21  LIN  .  2 
IF1L1N.GT.11  UN  •  1 
UNI  .  LIN 

1HNDIN.ED.21  UNI  •  1 
0)  243  1  •  l.UNl 
UU  •  SGAUSSI (.LIN) 

WU  •  WGAUSSI I.LINI 
IF1N0IN.NE.21  GO  TO  2 42 
UU  •  - 1 .0 
WU  •  l.D 
M  CONTINUE 

00  24J  J  •  1 ,LIN 
TT  •  SGAUSSI J. LI NJ 
WT  •  WGAUSSI J,LIN1*WU 
O'l  243  K  •  1 ,  L  I N 
11  •  11  ♦  I 

STUWl |,III  •  SGAUSSI*. L IN l 

STUWI2.I1)  •  TT 

STUMI 3, Ill  •  UU 

STUM  I  4* 1 1 1  •  WGAUSS!K,LIN|*WT 

43  CONTINUE 
LINT  •  11 
CD  TO  248 

•••«  NCI  "  1,  IRONS  INTEGRATION 

44  IFIND1N.NE. 3. OR.LIN.EO.il  GO  TO  241 


l l NT  •  6 

1F1L1N.GF.21  LINT  •  (4 
«S  •  SOIL  I N1 
R  W  -  W0ILINI 
00  246  1  •  1.7 
I?  •  2*1 
ll  •  12  •  1 

1F11.NE.4)  GO  10  249 
IS  •  SC IL IN | 
e*  •  WC1L1N1 
249  CONTINUE 

S  TUWl 1*111  •  9l«lll*IS 
S  TUWl 1*121  •  -STUNT  1*111 
S  TUWl 2,111  •  T  IP 1 1 1 90S 
S TUWl 2*  1 2 1  •  -STUWl 2*111 
STUW1 9* 1 1 1  •  UIP 11 1 90S 
STUWl 3. 1 2 1  •  -STUWl J, 11 1 
S  TU *■  1 4  *111  •  0W 

246  S  TUWl 4 ,121  •  HW 
GO  TO  240 

C9999  NCI  •  2,  TP  I ANCULAP  COOPOINATC  INTEGRATION 
249  LINT  -  1 

1F1L1N.GT.S1  LIN  •  3 
IFU1N.E0.2I  LINT  -  S 
1F1L1N.GE.SI  LINT  •  T 
00  247  1  •  1 , L I  NT 
STUWl  1  *  T 1  •  STP1U.L1N) 

STUWl 2  *  1 1  *  TTPIl 1 • L 1 M | 

STUWl 3*11  -  UT* 11 1 , L l N l 

247  STUW14.II  -  WTPUI.LIW! 

240  CONTINUE 

PE  TURN 
ENO 
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SUBROUTINE  **£  SH  |  MC ,  NUNNP,  NONE  L ,  NUNN  AT ,  N01  N,  NOF  ,  NEL  *  NE  L  1 » 

X  Of , TYPE, 0. I  COO, XYJ , F , 1 Y 1 
<-«•**  INPUT  MESH  AND  MATERIAL  PROPERTIES 
COMMON  /TAPES/  1TP9.1TP6 
R  E  AL  L  A  8L 

DIMENSION  TYPE  III,  OU,  21, 11,  I  C0011  I  .  XVI 1NDIH,  U  ,F  INOP,  11 1 
X  1XINELI.11  .U0I201 ,0X1  31, 1XPI20I,XW0«0I  111 
COMMON/GAUS/  L I n, SGAUSS  19,51, WGAUS S  15,51  Qli 

CUMMON/l ABELS/  LABI  16) ,XHEDI 3  1 ,  XH  ,  FHE0I61  ,FH,UHEOI 6 1 ,UH,RHE016 ) , RH 
X  ,  AWDROl,  AW  0®  02  ,  AWOR  03,  ME  AO  I  121,  START  ,CE  ASE  ,  I PG  .  NS  TP  ,W0R01 301 
COMMON /SHAP/  XJ AC, SHAPE  14 ,20)  ,  SGI  S,  3  1  .SKI  3,  ) 1 ,  Xl 3* 201 *L01 1201 
CQNMON/VALUES/  NCI, CONI ,C0N2 ,C0N3 1  S  1 
DATA  |)L  ANK/6HBL  ANX  / 

GO  T01 I ,2, 3,21 ,MC 
t  CONTINUE 

MC  T  •  D 

00  100  l  •  1 , NUMM AT 
MC  T  «  Mr  T  -  1 
IFIMCT.GT.D1  GO  TO  ID 
WR  ITE  I ITP6, 20DI 1  HE AD, l PG , NUMMA T 
IPG  •  IPG  .  1 
«CT  •  4 
10  CUNT1NUF 

REA0I1TPS, 10D21  M, OM, XUDRD 
I  FI M. GT .NJMMAT.OR .M.LE.Ol  GO  TO  301 

TVPEIM)  .  ON 

WR1 TFI ITP6, 20021  DN.M.XWORO 
00  230  J  *1,3 

00  29D  x  •  1,21 

26Q  0IJ,<»N1«D.0 


K  «  0 

00  290  .1  •  l,  3D 
1M0M.FD.W0R0I  Jl  1  GO  TO  400 
270  CONT  JN JE 

C....  ERROR  IT  EXIT  ON  LOOP  290 
301  WRlTSIITP6,2D321N,nM 
lPf,  •  0 
PE  TURN 

1  400  CALL  EIMLIQIN,M  , NOIN ,NDF , NEL , NEL 1 , NST F , NS  1 2 V  ,NVEC , MCT, OM ,0, XY2 , 

X  !X.F,PQRCE,ESTIF,U,VECT,1I 
30'  CONTINUF 
RETURN 

2  CONTINUE 

,  C 

I  C....  SET  XVm.N)  TO  BLANKS 

L 

00  20  N  •  1 , NUWNP 
X  Y2  I  1  ,  N 1  •  RIAN* 

On  20  I  •  1 ,NDC 


20  F)1,N)  •  0.0 

C 

C....  START  FILLING  DATA 
C 

N  •  0 
NXP  •  0 

21  NP  •  N 

I  F  IMC .EQ. 2. AND.N.GE  «NUMNP I  GO  TO  30 
NX  ■  NXP 

RE  AO  I  I  TPS, 1 006)  N, NXP, I, OX 
I  F1N.LE.0.0R.N.GT.NUMNP)  GO  TO  30 
IF (NC.EQ.2I  NXP  •  l 
IC001N)  -  1 
00  26  1*1, NOIN 
26  XY2 1 1 ,N I  -  0X111 

IF 1NX«  ED. 01  GO  TO  21 

IF ( IN-NP I *NX.GE .0)  GO  TO  29 

NX  ■  -  NX 

WRITE  1 1 TPA , 20)1 1  N»,N 
75  CONTINUE 

C 

C....  GENERATE  THE  NODES  BFTWFEN  NP  AND  N  IN  INTERVALS  OF  NX 
C 

LX  ■  1 1 ABS IN-NP 1  ♦  IABSINXI  -  11/HBSINXl 
DO  22  1  ■  1.N01N 

22  OXll)  •  l XY2 1 1 , N 1  -  XY2)I,NP)I/LX 

23  NP  •  NP  *  NX 

IF INX.GT.O.ANO.NP.GE.NI  GO  TO  21 
1FINX.LT.0.AN0.NP.LE.N)  GO  TO  21 
00  24  I  •  l.NOIM 

24  XY2II.NP)  •  X  Y2 1 1  » NP-NX1  •  f)X)Il 
ICOOINP)  •  0 

IF  IICOOINP-NXI.ED. IC00IN1)  ICOOINP)  •  1CC0INI 
GO  TO  23 
C 

C....  C  <ECX  IF  ALL  DATA  HAS  BEEN  INPUT  OR  GENERATED  AND  PRINT  OUTPUT 
C 

>0  CALL  PRTMSHI1,NUNNP,N0IN,  IC0D.XY2I 

RETURN 

CM**  INPUT  ELEMENT  CONNECTION  ARRAY 

3  MCT  ■  0 

NSIDE  -INELH  I/N0IMM2 
N*0 

MAP  •  0 

C****  SET  JP  INCREMENT  ARRAY  IC  NOT  INPUT  OFF  CAROS 
GO  TO  is: 

130  00  15)  l  •  l, NEL 

151  UOIL)  •  1  ■  R I  L  I 

irilxOI ll.NE.DI  GO  TO  1ST 
00  1  GO  L  •  l.NEL 


•age  n 
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I  KOI  L I  •  NSIOE 
M  •  6*NSI0f  ♦  1 
N2  •  t*NUOC  -  * 

IHN'.Gl.NFU  GO  TO  166 
00  152  L  •  NI.N2 
>t  IxOILI  •  1 
st  •  2*N$ I QE 
•O  •  Nl  »  2  -  NSIOE 
N4  ■  Nl  *  N? 
on  156  L  •  N3,N1 
UOILI  •  1 
1  ROIL  ♦  Nil  •  1 
|F|N2.GT.NEl!  GO  TO  156 
11011  ♦  N2I  •  1 
I  MOIL  *  N4I  •  1 
IS  CONTINUE 

1  CONTINUE 

2  VEA0IITP5, 10031  M,MA,1R,|P,|XR 
|F|M.|E«Oi  RETURN 

»U0(U»5« .  '061  1 1 XI I , Ml ,  I • I  »NEL  I 
(F1N.E0.0I  l  •  -  l 

IK(NEll,N|  -  MA  ♦  1 0* I F  •  100*|R 
*  l  •  1 

00  135  II  •  l,NEl 

(FI  111  1 1 « M )  ,  EO.OI  GO  TO  1)6 
*1  •  *1  ♦  l 
t  3 i  CONTINUE 

I  J4  IFU1.GT.NEU  GO  TO  160 
00  118  11  •  K 1 » NFL 
)  38  1 RFI 1  1 1  -  0 
140  N •  N*  1 

-CT  •  WCT  «  1 
If (MCT.GT.Ol  GO  TO  162 

w«|TP((  TON,  20111  HEAO.  IPG»NUMEL»  (It  1*1  •  NEL 1 
JPG  .  (PG  ♦  l 
SC  T  •  50 
rONUNUfc 

1HM.LE.Nt  GO  (0  170 
00  (58  l  -  liNEl 

SO  |x(l,N»  •  Ull.N-ll  ♦  l ROIL! 

UINEIUNI  •  SAP 
ITO  CONTINUE 
K  ■  0 

00  360  IUI.NEI 
1 F ( | <( ( ( ,NI .EO.OI  GO  TO  1 4 ( 

00  325  J 1  * (  1 1 NEL 
IM  I  XI  41, Nl  .EO.OI  GO  TO  340 
*K"|ABS(IX)  U.NI-U!  Jl.NI  1  ♦  I 
IFIK.LE.KO  K»<K 
326  CONTINUE 


PAGE  36 


HE  •  NE  -  1 
T  •  -1.0 
00  300  K  •  1 1 NT 
S  •  -1.0 
00  200  J  -  1 « NS 
R  ■  -  1.0 
00  100  I  •  I, NR 

CAU  RR(CK2tR,S.T,N0IM,NN,NS10EI 
C 

C....  CONPUTE  THE  NOOAL  C00R01NATES  OF  THE  N  -TH  NUOb 
C 

00  30  l  •  1 1 NOIN 
CC  •  0. 

00  60  N  ■  1,NN 

60  CC  •  CC  ♦  SHAPE 1 6,  N|  *X  I  l, Ml 
50  RV2ll.NI  •  CC 
C 

C....  5ET  THE  SURFACE  BOUNOARY  CONOITIONS  TO  PRESCRJHEO  CONDITIONS 
C 

IFII. E0.1  1  1  COO  I N |  -  ICOOINI  ♦  II 

I F | | • EO.NR I  ICOOINI  •  ICOOINI  ♦  12 

IFIJ. EO.l  I  ICOOINI  ■  ICOOINI  ♦  M 

I F ( J.EO.NSt  ICOOINI  •  ICOOINI  ♦  16 

I F (K.EOa 1  I  ICOOINI  -  ICOOINI  ♦  15 

IFIK. E0.NTI  ICOOINI  •  ICOOINI  ♦  16 

N  ■  N  ♦  I 

1 F ( R  ♦ EQ. NT  .ANO.  K.NE.ll  GO  TO  100 
IFH.FO.NR  .OR.  J.EO.  NSI  GO  TO  100 
ME  •  ME  ♦  I 
I RINEll  »  NE 1  »  NA 
1RII.NEI  •  N  -  I 
I  X  1 2 i NE I  •  N 
1X13. NEI  ■  N  »  NR 
1X16, NE!  ■  N  ♦  NR  -  | 

1FIN01N.E0.2I  GO  TO  100 
I  XI 5,  NEI  •  N  •  NR  S  **1 
1RI6.NEI  •  N  ♦  NRS 
1X17, NEI  ■  N  ♦  NRS  ♦  NR 
I X 1 8.  NE  I  •  N  ♦  NRS  ♦  NR  -I 
100  R  «  R  ♦  OR 

200  S  -  S  ♦  OS 

300  T  .  T  •  OT 

|F( IREUSE  .EO.  01  GO  TO  360 
J  •  ( (REUSE  -  11*100  ♦  NA 
00  320  l  •  NF.NE, IREUS? 

320  (RINEll, II  •  4 

360  I  F  »  |  PR  |  NT  .NF.  0 1  I  X I  NEI  I ,  NE  I  •  UINRWNEI  •  10 
|F(  INSH.EQ.OJ  CAU  PRTNfHINI.NF, NOIN, icon, un 
1F|  IELN.EU.O)  CAU  PRTElN|NE,NE,NEl,NEll,  111 
I F (NE .GT.NUNElt  NUNci  -  Mf 
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SUBROUTINE  RRKGENI  NUMNP,  NUNEl ,  NO!  M,  NOF  ,  NE  l  •  NEI  1 ,  1C00 ,  XV2  ,  F,  1 X I 
REAL  IAHI 

01  MENS  ION  I  COO)  | I , XY2 INOI N, | ) , I XINEl  1  •  I  »*F|NOF,l I 
COMMON  /TAPES/  ITP5.ITP6 

COMMON/ l ABFLS/  IABIIM,XHE0I3I,XH,FHE0I6I,FH,JHE0I61  ,UH,  RHEOI 6 1 ,  RH 
X  ,  AWORDI,  AW0R02,  AK0R03,MFAnil2l*START,CEASE,  IPG , N5T R  ,WOAO I  301 
COMMON /SNAP/  XJAC,  SHAPE  14 ,201  ,SG1  3, 31 1  SM  3,  31  ,XI3,  201,101  1201 

....  GENERATION  OF  NODAL  COORDINATES  ANO  BOUNOARY  COOES  FOR  BRICK  SHAPE 
....  PFG10NS  USING  ElENENT  SHAPE  FUNCTIONS  •  •  • 

....  INPUT  THE  RFGION  PROPERTIES 

R  EAOI I TP5, 10001  NN,  NR  .NS, NT ,N 1 ,NC . MA , NBC , IREUSE , IP R I  NT, IMSH, 1 6 IN 

PEA0IITP5, 10011  11,12,13,14,15,16 

RE A01 I  TPS,  10021  11X11,41, l»l, 11, J"1,NN I 

1FINS.lE.OI  NS" 1 

I F I NR.LE.O I  NR" 1 

I M  NT .IE . 01  NT"! 

IF1NI.IE.0I  Nl  -  1 
(FINE. lp. 0)  Nc  •  1 
IFIMA.I.E.OI  MA  •  l 

WRITE  I  |TR,  20001  HEA0,lPr,,NP,N5,NT,N  ,  NE  »  NA 

W« I TE 1 1TP6. 21001  11.12,13,16,15,16,1  XHEOI I  I, XH, |*l  ,NO|N| 

00  10  N  *  I »NN 

0  WRITE!  I  TP6 , 2001  I  I  XI  I  ,NI , I ■ l . "Ol Nl 

....  ‘IT  THE  CONTROL  CONSTANTS 

NSIOE  "  I NN ♦ I t /NDI M**2 

OR  •  2 ./FLOAT INR I 

OS  *  2./FL0ATINSI 

OT  •  2. /FLOAT  INTI 

NR  «  NR  ♦  I 

NS  •  NS  ♦  1 

NT  •  NT  ♦  I 

IFIN0IH.E0.21  NT  •  I 

NR  4  •  NR*NS 

N*-  ■  NR  S*NT  *  Nl  -  1 

If INF.GT.NuHNPI  GO  TO  400 

IFINOC.NE.OI  GO  TO  30 

....  SET  THE  BOUNOARY  CONDITION  COOES  TO  ZERO 

00  20  I  «  Nl.NF 

00  15  J  «  1  »NOF 

15  r  1  J  .  1  I  "0.0 

20  icoom  »  o 

iO  CONTINUE 

N  •  Nl 


360  CONTINUE 

|41  MAP*  N001 I XINELI ,NI, 101 
I R  •  | XCNEL l ,NI/ 100 
IP  •  N001 1*|NEL(,NI, I 00l/|0 

NR11EI1TP6,20051  N,NAR,|R,|P,  < 1 Xl I , Nl , I " I ,NEl 1 , * 

| F ( M-N I  185,180,160 
115  WRITEIITPA, 20311  N 
IPG  •  0 
RETURN 
|I4  NAP  •  NA 

IFINUMEl'Gl'Nl  GO  TO  130 
RETURN 

C****  FORMATS 

1002  FORMAT  115,  IX,  A5,  HAM 

1003  F0RNATI6I5, 20131 
1006  FORMAT  120161 

1004  FORM AT  1215, 110, 6F |0 .01 

2001  FORMAT! IHl, 1246, 30X,6HP AGE , 1 6// 1 5, 1  OH  MATERIALS// 

X  2QH  MAIFRIAL  PROPERTIES  // IXI 

2002  F  OR MAT  I SX , AS, I  X,  8HMAT ER I Al ♦ 15, 5X, 1 1 A6/ 1 X  I 
2005  FORM AT  I  2  5(51 

2011  FQRMATIlMl, 12 A6, 3 OX, 6 HP AGE , 16// 1 5, 9H  ELEMENTS// 

X  2 OH  ELM?  NAIL  R€  PANT  ,3X,2AHNOOES  CONNECTEO  TO  ELEMENT/ 

X  20H  NO,  NO,  USES  ,|X,20I2H  •,I2,IH*»I 

CPPPP 

CMM  ERROR  NESSAGES  * 

CPPPP 

2031  FORMAT  I26H0  ELENENT  CARO  ERROR,  N*I5I 

2032  FORMAT  1 26H0MATERI AL  CARO  ERROR,  N  ■  ,I3,2R,IH,TYPE  •  ,A5/I 

2033  FORMAT! 

X5X,5IH**N0N-F ATAL  ERROR**  INCREMENT  FOR  GENERATION  BETMEEN  NOOE  S , 
X  15, AM  ANO,  15, 37H  IS  OF  INCORRECT  SIGN  ••  SIGN  tMANGEO/IXl 
ENO 


»>Acr 


if 


RACE  )• 


5  ^ 


:o 

U* 1 T  El  1 TF4. 20331 

IRG  •  D 

A  E  TURN 

0 

T GRMAT 1 16151 

01 

<  R'UTIAJ  101 

12 

fna»Aina«,  5*- 10.01 

0 

FORMAT ( I H 1 , 12A6.30 

,*MPAGt,  U//17H  NO  01  GENERAT  IONS// 
I0X,25hNUM5FR  OP  R-INCRFmINTS  ,15/ 

4  IOX,24MNUNt)E*  OF  S-1NCREMENTS  .15/ 

10»,25^NU««ER  OF  T-INCREMfNTS  .15/ 

t  10X.25HMRST  NODES  NUMBER  .15/ 

X  IOY.25MF1RST  ELEMENT  NUMBER  • 1 5/ 

X  10X,25mECE*»ENT  MATERIAL  NUMBER  .15/  t  K I 

l  00  M»RMAT  ) 

»  10X.25H.  tr  ACf  BOUNDARY  COOE  .110/ 

5  10X.25H2-FACE  BOUNOAFV  COOE  .110/ 

t  10X.25MJ-PACE  BOUNDARY  COOE  .110/ 

i  101. 25HA-FACE  SQUNOAFY  COOE  .110/ 

t  101 1 25M5-F  ACE  BOUNDARY  COOE  .110/ 

t  10X. ?5KN-C ACE  50UNOARY  COOE  . 1 10//5X , 11 2 A* |J 

Jl  F0RMAT15XtlR3E12.il 

040  FOXHAT (51. ATM  ••FATAL  ERROR**  INSUFFICIENT  STORAGE  FOR  NOOES1 
ENO 


SUBROUTINE  FRTELMINf.Nr.NEL.Nfll. IX  I 
REAL  LARI 

OINENSION  IR1NEL1.I1 
COMMON  /TAPES/  1TR5.ITR6 

CUMMON/L ABELS/  LABLIM.  RHinm.XH.FHEDIAI  iFH,UNE014).Um.Rm10U),«h 
X  ,AMOR01.AM0«Q2«AM0A0).HEAOlI2l,*TART.CEASE.tFG.NSTR.MORU()0) 

MCT  •  0 

00  100  N  •  NE.NE 
MCT  •  MCT  -  I 
IF  l  MCT.  GT. 01  GO  TO  100 
MR  1 TE 1 1 TR* 1 101 1 1  MfAO.lFG.ME.il.!*!.  NEL1 
t R G  •  |FG  •  I 
MCT  •  50 
lOi  COMINUI 
R  •  0 

MA  -  MODI  I  X 1 NEL I.Nl.lOl 
(R  •  t X l NEL 1 .NI/100 
IF  •  M00I1X1NEL1.NI. 1001/10 
00  140  11  •  l.NEL 
I F ( I  X ( 1 1 . Nl aE  0. 0 1  GO  Tn  150 
00  135  Jl  •  1 l.NEL 
IFHXIJ1.N1.E0.01  GO  TO  140 
KK  •  IABS1 (XI 11.N1-1X1J1.NII  ♦  1 
IFIR.LT.RR!  R  •  K« 

135  CONTINUE 
140  CONTINUE 

150  W  R I T  E 1 1 TR6. 20051  N . MA .1 R . IF,  I IXl I .Nl . 1*1 .NEL 1  .R 
300  CONTINUE 

RETURN 

2005  FORMAT  12515) 

2011  F0RMATI1H1.12A6.30X.4MFAGE.  14//I5.9H  ELEMENTS// 

X  2 OH  ELMT  MATL  RE  FRNT  .JX.24HN00ES  CONNECTEO  TO  ELEMENT/ 

X  20H  NO.  NO.  USES  .1X.2012H  «.(2.1H*)I 

ENO 
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SUBROUTINE  PHTMSH(Nl.NIJMNPtNOIM,  IC00.XY2) 

real  Labl 

DIMENSION  ICOOlll.XV/INDlM,  II 
COMMON  /TAPES/  1TP5.ITP6 

COMMON/L ABELS/  LABL  161 , XMEO 1 3 1 . XH, FHEO 1 6 1 . FM,  UHEOI 6 1 .UH.RME016 ) .RH 
t  ,  AW0R01. Am0R02|AM0R03.HEA0(12I.START.CEASE. 1PG.NSTR .W0R0130 I 

DAT  L  BL  ANR/4HBL ANR  / 

MCT  -  0 

DO  33  N  «  Nl.NUMNP 
**CT  «  MCT  -  l 
IMMCT.GT.OI  GO  TO  31 

MRfTEI 1TP6.2010I  MEAD, I PG. NUMNP, 1XHE01 1 1 , XH, 1*1 ,N0 (Ml 

IPG  -  IPG  •  l 
"CT  «  CO 

\  IT IXY2I liN) .EO.BLANKI  GO  TO  32 

HR! TEI l T  P4 1 2006 1  N. IC001NJ . ( XYZ1 1 1  N)  t I-l.NDIN) 

GO  T()  33 

32  hR! TF ( l TPfc. 200 f I  N 
4  CONTINUE 

RE  TURN 

;0f»  rORMATI?M2,7Fl3.4! 

07  TORMATI ! 12.5X.I1HHAS  NOT  BEEN  INPUT  OR  GENERATED  I 
010  fOP-ATUMl,  12A6, 30X.4HPAGE.  I4//15.13H  NOOAL  POINTS// 

X  12M  NODAL  POINT  t6Xi6H*6.C. *.  711X, 2.6)1 

END 
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SUBROUTINE  PRTMAT! MFAO.  IPGiNELM.NSTFiESTIF.FCIRCc.LO.NTI 
COMMON  /TAPES/  ITP5.ITP6 

DIMENSION  €ST IF1 NT, NT  1  .FORCE  INTI .LOINTI .HE  A0( 12  I 
MBLK  -  !NSTF*2Jl/24 
NBL*  •  (NSTF  ♦  BI/9 
Nl  ■  1 

00  200  NN  •  l.NBLK 
N2  •  Nl  ♦  B 

TFIN2.GT.NSTF)  N2  •  NSTF 
Mi  «  l 

00  100  MM  •  It MBLK 
M2  •  Ml  ♦  23 

IFIM2.GT.NSTFI  M2  -  NSTF 

MR! TEI ITP6, 20001  HE AD, I PG. NEL M, I J , J* N 1 ,  N2) 

IPG  ■  IPG  ♦  l 
00  50  l  «  Ml, M2 

50  WRITE!  (TP6, 2002)  I ,  L  D  ( 1 1 . 1  EST  IF  1 1 .  J  1 ,  J»l. . ,  N2  l 
100  Ml  ■  M2  *  1 

HRITF 1 1TP6, 20D1I  C  FORCE! J  1, J-NI.N2I 
200  Nl  ■  N2  ♦  l 
RETURN 

2000  FORMAT  1 1 H 1 1  l 2A6, 30X , 4HPAGE , 1 4/ /5<, 7HEL EMEN 1  tl5i7*»  MA  TR  1  X/  / 
X  2X,7HR0M/C0Lt3X,9T12) 

2001  FORMAT  I /3X, 5MF0PCE , 4X , 1P9E 1 2. 3) 

2002  FORMAT ( /)4. 3H  LO. I  5 ,  l P9E I  2 . 3 1 
ENO 


*1 


«? 


SUBPOLUNE  MUHN.WWPiMJSM 
/TAPES'  !TP4,ITPA 
*t  AL  l AH 

coXoN/iAMiw  iiiuAi,xHfom#iH,»HroiM*PH.uHfa*ji#jjj#w*ioi4if«H 
X  »  AaJPDIt  AWC»D2.AWDPD1#H»  AO  1 I2I»STAA?tCIASt»  |PO»  Mil  A  « WORD  I  101 
HCT  •  0 

IMM.GT.0l  CO  TO  200 
Dr)  1(0  I  •  ItNUNNP 
PD  100  J  •  It  NOP 
0  HJtll-D.D 

IFlN.CU.O)  *C  TUAN 

N  ■  -  N 

0  CDNTJNUf  .  t 

■  E AO)  I  TPS.  10001  J*|PI  I*  Jit  1*1  *NOF| 

MAI  TE(|TP6?2000|THEA0?!PGt>WPNPi  IPNEOII  It  PM,  !•  l»NOPI 
IPG  •  IPG  *  1 

«T  ■  j  j 

•  50  MRITEIITP4, 20011  J * |P 1 1 • Jl» ••» • NOPI 
1*1  J.r.E.NUHNPI  AETUAN 
iHj.r.f.N)  *6 TUAN 
GD  TO  200 

la  format!  ImUUAa!  1DK.4MPAGE.  U//IS»I1N  NOOAt  fOACES/2 
X  12M  NOOAL  PO | NT . T 1 1 K . 2A6)  I 
01  FDAMAT012.  4EIJ.41 

END 


100 


200 
c*  •• 


211 

202 

201 

100 

TOO 


1000 

2000 

2001 


FUNCTION  PAOPlOUtM 

01  Mf  Nil  ON  TAALf  I4»l  *TL*.|I1I 

COMMON  /TAPE!/  1TP**11P* 

DATA  UAA/|OMP(H.YNON!Alt!0HP|«IO01C  tlOMUiU  INPUT 2 
IMN'FD.O)  CO  TO  200 
,  INPUT  TAALf 
NTfANS  •  N 

AIA0I1TP5. 10001  IITAIII 11 »JI» !•!••!# J«1*NI 
WAITE) 1TPA»  2001 1 
DO  100  J  •  1 *N 
A  •  TAHEIUJ! 

if  U, IT.)  .DA. A. CT. II  CO  TO  TOO 
l  .  TAIL! ) 2 1  J I  ,  . 

WA1TIIITP6.2000I  UAilAM,  lTAHflltJlilOtNI 
AC  TUAN 
PADPLO  •  o. 

,  INTI APOLATI  TNE  TABU 
DO  100  J  •  ) f NTI AN5 
TN1N  •  TABLfll.J) 

TMAK  •  TABlCIA'J) 

IFIT.LT.TNIN.DA.T.CT.TNAM  CO  TO  100 

A  •  TABLE  1 1 «  J) 

b)  TO  1201, 202, 2011. A 

TT  •  ).0 

00  211  I  ■  4,f 

PAOPIO  ■  PADPLO  •  TABLEII.J)PTT 
TT  •  TTPT 
GO  TO  100 
A  •  TABLE ) 2, J) 

IHK.EQ.O)  A  •  I 
PADPLO  "  PADPLO 


„  -  .  T  ABLE ) A, J I  ♦TABLEIB»J)PISINITABLE(6.JI*TI)PPA 

X  a 'TABLE ) T»  Jl* ICOSITABLf I •• J ) *T ! I p*R 

CD  TO  100 

CALL  |XPAL0)PA0P.T.TABLII2.N)I 

PADPLO  •  PAOP 

CONTINUE 

AETUAN 

WAITE) )TP6, 20101  A 
IPG  ■  0 

AC  TUAN 

FDA  NAT  I  2P1.0,  TF 1 0.01 

FOANAT 12K.AI0.I5.7E14.5I 

FORMAT <//5K.21MPAOPD«T)ONAL  LOAD  TABLE// 

X  JK.9MTVPE  LOAD. 5M  f XP , 5  K#  9HN| N.  TINE , 5K. 9MMAK .  HNE.5K, 

X  2MA0,12K.2MAI.12X,2MA2.12X,2HA1,12K.2HA4/1K< 

FOANAT I 5DH  PAOPDATIDNAL  LOAD  INPUT  TABLE  ERROR.  INPUT  TVRE  •#ll/< 
END 
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SUBROUTINE  ELNLlBIN|NA,ND|N,N0FfNEL.NELl»N5TF.NS  U V.NVEC# NCT. ON. 0. 

X  XVJ.lX.F.FORCc.ESTIF.U.VECT.lSWI 

'USioN/UUlt/  L.au  «fal  .KHE0.3  , .  .FH.UHED.fc,  .  PM 

I  ,  AMORDI,  A.ORftf,  A.OROJ,  HE  API  121,  START, CEASE,  IPS.NSIR..0R0I10I 

..  ELENENT  L1BRARV  FOR  FEAPT2 

ISW  •  1  FOR  NATERUl  CHAR ACT ER 17  AT  ION 
| SW  •  2  FOR  CHECK  ON  ME5M 
I  5M  .  )  FOX  ELEMENT  STIFFNESS  F DRMUL AT ( DN 

1SW  •  4  FOR  ELEMENT  OUTPUTS  . 

ISM  •  i  FOR  ELEMENT  LOAO/VECTOR  COMRUTAT  IONS 
>(  ISM  •  6  FOR  NON-LINEAR  LOAO  VECTOR  COMPUTATIONS 

on  5fc  J  ■  I  ,1D 

IFIDN.CQ.WOROI Jl I  GO  TO  57 

00N!-m!.  2.  J.  4.S.6,  T.«.R.  10.  U. 12. U. 14.15,1., IT. IS.19.  ,0.21.22. 

^CALL^ELNTO  WN.NaInOIn'.NOF.NEL.NELI.NSTF.NS^V.NVEC.NCT  .0N.D.XV2. 

X  l«,F, FORCE. ESTIF.U.VECT.IS.I 

L ALLTEL NT02  I N »MA, NOI N ,NOF , NEL  »N£L1  , NSTF ,NS 17 V  »NVEC  » NCT »  ON, 0, XVI » 

«  |X,r, FORCE. ESTIF.U.VECT.IS.I 

CALL^EINTO 1 IN.NA .N01N.NOF .NEL.N6L1 .NSTF.NS 1 2V.NVEC  »  NCT. DN.O. XV7, 

K  IX, F, FORCE, ESTIF.U.VECT.IS.I 

CALL^ELNTDA IN.NA, NOI M.NOF.NEL  »NEL1  .NSTF.NSI2V.NVEC .NCT.DN.O.XVI. 

K  |x, F, FORCE. ESTIF, U, VECT, 1S.I 

rALLDFLNTDSIN,NA,NOtN,NDF,NEL.NELl.NSTF,NSUV.NVEC.NCT,ON,O.XVI. 

X  IX, F, FORCE, ESTIF.U.VECT.IS.I 

CALL^FLNTOMN.NX.NOl  N.NOF.NEL  .NELI.NSTF.NSIIV.NVEC.HCT.OH.O,  XVI , 

X  I K.F . FORCE. ESTIF.U.VECT.IS.I 

CAll 'elNTDT IN.NA.NOIN.NOF.NFL.NELI  .NSTF.NSI 7V.NVEC, NCT,  ON.O. XV2, 

X  IX, F, FORCE. ESTIF.U.VECT.IS.I 

CALI  ELNIOR I N.RA.N01M ,N0F ,N6C»NEL1»NSTF,NSI7V,NVEC,NCT,0N,0»XV7, 
x  l»,F, FORCE, ESTIF.U.VECT, IS. I 

CALlVNTDUN.HA.NOIN.NOF.hEl.NEU.NSTF.NSIIV.NVEC.HCT.ON.O.ITI, 

X  (X.r , FORCE. ESTIF.U.VECT, ISMl 

)  r ALL^ELMTIO  IN.MA.NDIM.Nnr , NEL .NELl .NSTF.N SI2 V.NVEC .NCT. DN.D, XVi , 

X  *  I  X, F .FORCE, ESTIF.U.VECT, ISWI 
GO  TO  99 


11 

12 

11 

14 

15 

14 

IT 

IB 

19 

20 

21 

22 

21 

24 

25 

24 

?7 
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CALL  EL NT  11 IN.NA.NDIN.NOF.NEL ,NEL1 tNSTF ,NS  ,NVEC , HCT , DN.O, XV 7 , 

X  ix.f.force.estif.u.vect.iswi 

CALL0ELMTI2IN,NA,NOIN,NOF,NEL,NELl.NSTF.NSUV,NVE:,NCT,DHtD,XY2, 

X  )X, F.FDRCE, ESTIF.U.VECT, ISA) 

CALLDELMT1HN,NA,N0|N,N0F,NEL,NE11,NSTF,NSWV,NVEC,MCT,DM.D,XV2, 

X  IX, F.FDRCf, ESTIF.U.VECT, ISWl 

CALL0ELNmlN,NA.NOtH.NOF,NEL,NEll.NSTF,NSI7V,NVEC,NCT.ON,O.XV7, 

X  U,F, FORCE, ESTIF.U.VECT.IS.I 

CALLBELNT15IN,NA,ND|M,NOF,NEL,NEL1.NSTF,NSIIV,NVEC,HCT,ON,O.XV7, 

X  tX,F, FORCE, ESTIF.U.VECT, ISMl 

CAIL0EL*T»»IN. NA, NOIH, NO*,  NEL, NEL1. NSTF, NS17V.NVEC,  NCT.DN.O.XVI, 

X  IX, F, FORCE. ESTIF.U.VECT, 15.1 

C  ALLTEL  NT  IT  IN.NA.NDIN  ,NOF  .NEL  .NEtl.NSTF.NSI  2  V.NVEC  ,  NCT,  DN.O,  XVI  i 
X  II.F, FORCE, ESTIF.U.VECT, IS. I 

CALl^E  t^T  16  IN.NA,  NOI N.NOF.NEL  »NEL 1. NSTF, NS  1 7 V.NVEC ,  NCT.ON.D.xvl, 

X  IX, F, FORCE. ESTIF.U.VECT, IS.) 

CXLL^E  LNT 19  IN.NA.NOIN.NOF  .NEL.NELl.NSTF.NSIIV.NVEC.NCT.ON.D,  XY7, 

X  IX, F, FORCE, ESTIF.U.VECT,  IS. I 

C  ALLTEL **T20 1 N.NA  ,N0!  N.NDF ,  NEL.NEL1.NSTF.NS12V.NVEC  ,  NC  T,  DN.D ,  XVI , 

X  II, F, FORCE. ESTIF.U.VECT, IS. I 

C  AlL[>ELNT2l  IN, NA,  NOIN, NDF.NEl. NEL  l.NSIF.NSII  V.NVEC.  NCT,  ON. 0.XV2, 

X  IX, F, FORCE, ESTIF.U.VECT.IS.I 

c2il0eiSt221n.na.noin.ndf,nei.neii.nstf.nsuv,nvec.nct,on.o,xv7, 

X  IX, F, FORCE, ESTIF.U.VECT.IS.I 

CxlL^ELNTZHN, NA.N01N, NDF.NEL, NELl, NSTF.NSWV.NVEC, NCT,  ON.D,  XVI , 
X  IX, F, FORCE, ESTIF.U.VECT.IS.I 

C ALLTEL NT  24  IN.NA.NDIN.NOF  .NEL.NELl  .NSTF.NS  I  IV.NVEC  ,.CT ,  ON.O.  XV  7 . 

X  IX, F, FORCE, ESTIF.U.VECT.IS.I 

CALL,1ELNT2SIN,NA,NO|H,NOF,NEL.NEL1,NSTF,NSI7V,NVEC.MCT,ON,O.XV7. 

X  IX, F.EDRCE, ESTIF.U.VECT.IS.I 

CALL  EL  NT  26  1N.NA.N0IN.NDF  ,  NEL  ,NEL1»NSTE,NS17V.NVEC,NCT,0N,0»XV7. 
X  IX. F.FDRCE, ESTIF.U.VECT, IS. I 

LALL%LNT27lN.NA.N01N,NDE,NEL.NELI»NSTE,NSI7V»NVECiNCT>OM,0»XV2> 

X  |X, F, FORCE. ESTIF.U.VECT, IS. I 
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t  CAlt  ElMT,'i||N,MA,N01M.NPf  ,  N£ l  ,N!l  l  »NSTF ,NS 1 IV , NVEC » MC T, ON ,0 » XY 2 , 

9  1I,F,»nRCf  .liTIP.U.Vff-T.liWl 
GO  TO  99 

-,'i  C  All  UNT29(N.NA,N0(N,N^f  ,  Nf  l  ,N*  1 1  ,N5l  P  »NS1  2  V,N  ViC  ,  MC  T  »  OM  ,3,  Xf  2  , 
«  I  l.F.umCE.ESTIF ,l!,V!C».UMl 
GO  TO  49 

IG  CALL  El  NT  lJ|N,MA,NP1M,NnF,N!l,Nlll»NSlF,NS12V»NVFC»NCT»OM,0,XY2» 

I  U,F, FORCE. BSTlF.U.VECT.lSwl 
Q4  RETURN 

f  NO 


iu*«uui lie  MJHHI  nu*n*.  pmjhei,  NUMMA1  ,N01M,NDr  ,Ntl,NEl  1, 1  Of,  101. 

A  "7|MtOT|TYPEtOi1CQOtiVf|1i|ioESTi1SlA'NfG*t1Ak4» NOEG! 

FEAl  IAH 

OlMfNSlON  TYPf  I II,  0143,  II, «»MN014,1I,  111  Nil  1,1 1,|  0ESTlN3F.il 

A  • 1C >01  1 1 

COMMJN/LARELS/  lAAll41,lHfOI)l,IH,FH|OUI,FH,UHEaUl,UH,AHEOl4l,AH 
*  •  A«3A0t,Atf0«O2,AU0P03,MEA0ll21,STAAT,CEASE,lPG,NSTl,w3l0l)ai 

COWMON/SHAP/  XjAf  ,  SNAP E( 4,20 1 • SGT), 11, Si 11, II, Al  1,201,101 1201 
COMMON  /TAMS/  1  TP t, 1 TP4 
OATA  Bl  ANA  /  AH Al  ANK  / 

101  •  10T  ♦  l 

C„««  SET  UP  the  destination  vector 
NOEG  •  0 

00  140  N  •  l,NU«NP 
1C  -  1  COD  1 N 1 
II  -  100000 
00  120  1  •  I,N0F 
I0ISTI1.NI  •  0 
miC.LT.lLI  GO  TO  ISO 
100  1C  •  1C  -  II 

IH1C.GT.111  GO  TO  100 
GO  TO  120 

ISO  NOEG  •  NOEG  ♦  1 

10ESTM.N1  •  NOEG 
120  11  "  11210 
140  CONTINUE 
ACT  •  0 


00  160  N  •  l.NUNNP 
MCT  •  MCT  -  1 
1F1NCT.GT.0I  GO  TO  140 
MCT  •  SO 

Mil TE1 1TP4, 20)31  HEA0«1PG«IUHE0!1I,1*1,N0H 

IPG  •  IPG  ♦  1 

140  N41TEIITP6, 20001  N, 1 10EST1 1 ,N I , 1*1 ,N0F| 

C,..,  COMPUTE  THE  BAN0W10TH  PF  THE  MESH 
MB  •  0 

00  190  N  •  l.NUMEl 
MM  ■  0 
NN  •  0 

00  1T0  1  •  1 »NEt 
K  •  IXI1,NI 
1FIK.E0.01  GO  TO  160 
00  ITO  J  •  l.NOF 
1C  •  lOESTlJ.Kl 
1FMC.GT.MM1  MM  •  1C 
1F11C  .EO.  01  GO  TO  170 
1FI1C.IT.NN.0R.NN.EQ.01  NN  -  1C 
170  CONTINUE 

180  IF  I MM-NN.GT .MSI  MB  -  NM-NN 
190  CONTINUE 
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MB  •  MB  •  1 
Mill  -  MQ  ♦  2 
NEOH  -  10T/MB1 

IF!  NF OB. GT.NOEG I  NEOB  -  NOEG 

IBlK  •  ( NUEG*NEOB  -  l ) /NEOB 

MR  ITEM  TP6.2031)  HE  AO ,  1  Pf. ,  NOEG,  MB,  NEOB ,  I  BIK 

|PG  »  IPG  •  l 

I  S2A  -  NEQB* ( MB* I ) 

f.P»*«  CHECK  “ESH  FOR  CONSISTENCY  OF  OATA 
00  50  N  •  l,NUHEl 
MA  »  MOOUKINEll.N)  ,10) 

1FIMA.GT.NUMMAT.0R.MA.IE.01  GO  TO  40 
OM  •  TYPEIMA) 

FLAG  »  1.0 
00  205  I *1 »  NEl 
K  •  (XI  I  ,N) 

1  FlK.GT .NUMNP.O® .K.LT.O 1  GO  TO  40 
IF  1 K.EO.O)  GO  TO  205 
NEN  »  I 

I F  (  XY2I1.K)  .  NE .  BLANK!  GO  TO  195 
FLAG  .  *1. 

WRITE! (TP6,2034IK,N 
IPG  »  0 
GO  TO  205 
195  CONTINUE 

00  200  J  •  l.NOlN 
20C  XIJ.II  •  X Y  2 ( J , K I 
205  CONTINUE 

I F ( FLAG  ,GT.  0.01 

I  CALL  ELMLIB<N,MA,NO(M,NOF,NEN,NEll.NSTF,NS12V.NVEC,NCT.OM,O.XV2, 
I  IX,F,F0RCE,EST1F,U,VECT,2) 

40  1M0M.GT.0.0)  GO  TO  50 

40  WRITE! I TP6, 20301  N» MA, 0", I lXl J,NI , J" I ,NEL I 
lpG  »  0 

50  CONTINUE 

IFMRG  .GT.  0!  WRI  TE1  (TP6, 20121 
RETURN 

2000  FORMAT  I  I  10. 5X, 6141 

2030  FGRMAT(BH0ELEMENT,I5,10H,  MA T ER 1 AL . 1 5 , 1  OH ,  JACOBI AN, E 1 2 . 4  / 

X  9M  IX  ARRAY, 2015! 

2031  FORMAT! 1H1,  12A6,30X,4HPAGE, I4//17H  E0UAT10N  SUMMARY// 

X  5X  »  2 1 HNUNB  E#  OF  EOUATfONS  •»  16//5I, 2 1HMA  XI  MUM  HAIFBANO  -,16// 
X  51.2! MfOUATI PNS  RER  BLOCK  *,16// 

X  51,2 1MNUMBER  OF  BLOCKS  «, (6//4I, 2BI IM# I /////IX) 

2032  F0RMAT15X.46HN0  ERRORS  OF  TEC  TED  0UR1NG  A  CHECK  OF  THE  MESH  ) 

2033  FORMAT! IHI.  I2A6,30<i4HPAGE, 14//19H  0EST1NATIUN  VECTOR// 

*  fcX,  4HN00F,  2  X  •  3H0QF  ,  6  A& 

2034  f ORM AT  I  2! H  ••FATAL  ERROR*»NOOE,  I 
XLEMENT,  16  1 

END 
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SUBROUTINE  CKBR 1 K| NO I M, NE N, FI AG1 

COMMON/SHAP/  XJAC , SHAPE! 4 ,20! ,SGI3,3) ,SK(3i3),XI  3.20)  ,10!  1201 
FLAG  ■  I, 

NSIOE  -  (NEN«lt/N01MP*2 
L  •  1 

1FIN01M.EQ.2)  L  -  2 
IS  •  1.0 
00  30  1  ■  L,  2 
ss  -  -ss 

TT  •  1.0 
on  30  J  »  1,2 
TT  .  -  TT 
UU  •  1,0 
00  30  K  ■  1,2 
UU  »  -UU 

CALL  BR1CK21UU,TT»SS»N01M,NEN,NS10EI 
1F1XJAC.IE.0.01  GO  TO  40 
30  CONTINUE 
RETURN 

40  FLAG  •  XJAC 
RETURN 
ENO 


6.  34H  NOT  INPUT  BUT  IS  USEU  IN  E 


ACT  *1 


MCI  90 


«annr  inc  0ISTASINU*NP,NM*EL  .NummAT  ,N0t**N0F  ,NEN»NEL  l  »*STF  , NYkC • 

.  feAt  lifll 

i;?S«5iiaS”;!«;N«?,.ii.ii.if»iii.««iNi»w.i..uiNiti.i..u.u. 

fSSSir?J!».s!5!!!i^«t!:a!!na . 

E^lSS^SSSiaSSaiis? 

II-  INt  .GT.ll  GO  TJ  190 
....  SC  r  LABEL  STATENEV  10*  ••INT  OUTS 
NfRO  •  NJ I M  •  NOF  •  NO! 

I  •  2 

-  1»N01M 
AWQAOl 
SKIP 


mo 


no  mo  j 
LARl  I  ll 
aiARIll  1 
1*1*1 
LAHIII  ■ 

PL  AM  1 1  • 


AW0I02 

AW0R02 


«.? 

C 

C 

r. 

*.5 


0 1 RL  ACENENT  PRINTOUT  CODING 

00  AO  J  -l.NUNNP 

ICOOUI  ■  IOUT 

f  M  1  OUT  .50.  01  GO  TO  4t 

PE  *1 1 1 TPS, 20S0I  N'JKOIS 

IMNUM01S  .EO.  01  GO  TO  At 

Ofl  42  J  •  1 « NUMOl  s 

RFAOl ITRS, 20601  I STA« T , IE  NO* I«C 

|Fl JNC.LE.01  INC  •  1 

If | |«NO.GT.NUNNPl  IENO  ■  NUNNP 

on  A!  I  ■  l START. IENO. TNC 

1C00I 1)  •  o 

IFUEN0.GT.01  I  COO  I  (END  1  •  0 

STRESS  PRINTOUT  CODING 

NL 2  «  Nf.N»  I 

00  46  J-l.NUMEL 

1X1 NL  2 . J (  ■  IOUT 

( r I IOUT  ,EU.  01  GO  TP  190 

PEAOUTOA,  OS0(  NUMSTA.NSIG 

1 f ( NUNS  TR  .EO.  01  GO  TO  190 

00  AS  J  •  I.NUNSTR 

BE AOI ( TPS, 20601  l START, IFNO, INC 


irUNC.LE.01  INC  ■  I 

1*11  END.GT •  NUNf L I  T  FNO  •  NUNEL 

00  4?  I  •  1STAAT, IENO, INC 

AT  14INL2.il  •  0 

4P  IMI'NO.Gl.OI  IMNL2.1EN01  ■  0 

190  C3NT1NUF 

IT  ( 1AEC.E3.01  r,0  TO  211 
NOEG  •  NOFRNUNNP 

on  210  l  •  l.NOEG 
210  All'  *  0.0 

ell**  Co5pUTEEELENENT  VARIABLES  a  •  STRESS  ANO  STRAIN  COMPUIAHONS  ETC. 
CARA*  COMPUTE  REACTIONS  FOR  CHECK 
TIAR  •  0, 

NOPANT  •  NP* 

00  900  N  •  l.NUNEL 
NPL  •  .TRUE. 

NRA  •  NOPANT 

1  f  1 1 1 1 NL 2. Nl  .NE.  01  NRR  •  .TRUE. 

1FINUHPLT  « f 3.  01  GO  TO  50 
00  It  1*1, NURPL  T 

3t  IFCNE0ATAU,11  .EO.  N)  NPL  •  .FALSE. 

SO  CONTINUE 

IFUAEC.GT.OI  REA0I71  EST1F 
MA  -  HOOl IXlNELl »NI *  101 
ON  >  TYPE  I NA| 

1FI0N.NE.TLA0)  •:?  -  0 
TLAB  •  ON 
L  •  0 

00  110  I  •  I.NEN 
K  •  1X11, Nl 
N3  •  NOFaIX-11 
00  212  J  •  I* NOF 
L  ■  L  *  1 
L0IL1  ■  N3  ♦  J 
1FIK.E0.0I  LOILI  •  0 
212  CONTINUE 

IFIK. E0.0)  GO  TO  110 
NEL  •  1 

00  100  J  •  l » NO IN 
100  XCJ.ll  •  XY2IJ.KI 
110  CONTINUE 

IF  1 1REC.E0.0)  GO  TO  240 

NST  •  NOFPNEL 

00  230  I  •  1 » NST 

TENR  '  0,0 

00  220  J  •  l.NST 

L  -  LOIJ) 

IFIL. LE.01  GO  TO  220 

TENR  -  TENP  f  EST1FI  I , J 1  »U I L  I 
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??.0  CONTINUE 
K  «  LOt 1 1 

imk.le.oi  go  rc  230 

PIK1  -  RIKI  •  TENP 

?  30  CONTINUE 

240  |r(NRR  .ANO.  NRLI  GO  TO  SOO 

CALL  ELMLIMN,MA,N0TM,N0F  ,  NEL ,  NELl , NSTF ,NS I  2V .NVEC • NCT, ON ,0* XY J , 

X  I «,F, FORCE, ESUF.U.VECT, 41 
SOO  CONTINUE 

OUTPUT  SOLUTION  AT  NOOAL  POINTS 
HCT  ■  0 

DO  AOI  N  ■  liNUNNP 

I r | J COOI N 1  .NE.  01  GO  TO  AOI 

N 3  «  NOF* I N  -  1 1 

MCT  ■  Mr  T  -  I 

IT  INCT.'.T  .01  GO  TO  AOO 

MCT  ■  SO 

If  INFP0.0T.9I  MCT  ’  2 5 
IM  IRFC.EO.O.OR.NFPO.GT.9) 

XMRITtl  |  TP6, 20001  MEA0,T!MF,|RG,IXME0UI.XM,1«I  .N01N1, 

X  IUHEOI  I  I  ,UM,|-|,NOFI 

IF  I  I R  EC • G  Ta  0. ANO.NF PO . GT. 9  I  WRITE  I  IT Pfc, 200 1)  I  BLNK6 * BLNK6 , 1 ■ I ,N01N 
1  I  (1RH*0III  ,RM,|*l,NDF| 

IM  UEC.GT.D.  ANO.NF  PO.LE.  91 

XWRITE I ITP6, 20001  HfcAO.T  1«E , I PG, I XHEOI I  I , XH , 1  -  I . N01 Nl  , 

A  IUHEOI 1 1 ,UH,|-l,NOFl, IRHEOI I 1,RH. l-I.NOF  1 


IPG  ■  |PG  *  l 

-.00  l  F  J  XY2  I  I  ,NI  .NE .  BL  ANK.  ANO.  1 1REC.GT.0.  AND.NFPO.L  E  .91  I 

X  WR1  TE  I  l  TPb.LAiJL  1  N,  I  XY  l  II  ,  N 1  , 1  ■  I ,  NO  I  Nl ,  1  U I  N3  ♦  1 1  .  I  ■  I »  NOF ) 
X  i | R I N3* 1  1.1-1 .NOF | 

1F1XY211.N1 .NE. BLANK. ANO. 1 1  RE C. FO. 0. OR . NFPO.GT .9  11 
X  WR  (  TE  I  I  TP<  ,LA3L  I  N,  I  YY2  I  I  ,NJ  ,  I  -  1 .  NO  INI  .  IU1N3  ♦  ll«I*l,NOFl 
IFIXY2II.NI .NE. BLANK. AND. I  I REC .GT .0. ANO.NFPO .GT .911 
X  NP ( TE I  I TPb.RLAB I  I R I N3* I  1,1*1 ,N0F1 
hOI  CONTINUE 

|F I IHEC.E3.0I  GO  TO  300 
8 NOR M  ■  0.0 
00  2 SO  K  •  I, NOF 
STATIK1  •  0.0 
2  SO  ASTATIK1  »  0.0 

00  260  N  «  l.NUMNP 
N3  ■  NOF* I N » 1  I 
00  260  *  ■  l.NOf 
PNG  PM  «  PNQRM  ♦  Rl  Nl «  K|  *IJ|N3«K  I 
S 1  A  f  |  <  |  »  GT  AT  If  1  •  P |N3* *  I 
260  ASTATIKI  •  ASTAUKI  .  ABSIRIN3*KI1 
C . • • •  OUTPUT  STATICS  CHEC« 

WR1TFI1TP6. 20021  HFAO.IPG 
IPG  »  IPG  •  l 


00  310  K  •  l.NDF 

310  WR1TEIITP6, 20031  K , ST  AT  I K I , ASTATI K I 
WR1TEUTP6, 20041  RNOAN 
300  1 F I IBLK.EQ.O)  RETURN 

REW1N0  7 
REA0I7I 
RETURN 

2000  FORMAT! IHI,12A6,E13.S,20X,4HPAGE,I4//SX. 12HN00AL  VALUES// 
X  I2H  NOOAL  POINT, 91 1X.2A6I 1 

2001  F0RMATII2X.9I IX.2A6  1  I 

2002  FORMAT  II  HI  ,  1 2 A6  »  30X , 4HRAGE , 1 4 // 5X, 1 BHREACT l ON  SUM  CHECK// 
X  TX,  3HN0F,  8X.5HSUM  R,3X,10HSUN  ABSIR1/I 

2003  FORMAT I1I0*2EI1.4) 

200A  FORMAT  I //SX, 14HENERGY  NORN  •  .E20. ( 0 1 
20S0  FORMAT! It, SX, 71! 1 
2060  FORMAT  13151 
ENO 
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r 

c 


c 

c... 

c... 

c... 

c 


C..I 

c 


is 

40 

c 

c. 

c 


SUBROUTINE  ElPcCT|MJ*N*,*W«EL.NU>mT,N0l'S»i06,N6L.NEl'  .NSTE.NVEI., 

»  NS  12  V, TYPE  ,Q,IC00,IY2,F,  |I,MASS,F0«CE,6ST|F,VECT,U,U0,U0D,UU,VV, 

A  T**Mf  ,  IOUT.NOEGI 

IMPLICIT  THE  iMFf.UI  IZ'i  *3*  7hE  UNOANPEP  EQUATIONS  Of  NOTION 
“DCI* I C A T 1  ON  II  ♦  *  MAY  1972 

REAL  -'ASS 

LOGICAL  NPR* NPL, l*EU'E»*CT6LG 

0  I  PENS  I  ON  TYPElll-OI 3,21,  I  (tICODIl  IiK?IlN^|N,l  :  ,  *  |  1 1 ,  HI  NEL 1 , 1 1 , 

X  NASSI II  , FOBCEI NSTF, 21  ,  ESTIH  N3TF»NSTF|  •  TYNE  171  *wl II «UPI 1I,U00I  I  I, 
i  UUl  UtVVI  1  I 

CONHON/OYNAMO/T(Nf , NS  IGI? I. NT, NSTEP, 0T,NUNPLT.<v2QAT AI20.11, NH.NPt 
CQNNON  /TAPES/  |TP4,|TP€ 

CONNON/SHAP/  XjAC,SHAPEl4,20t,SG! 1. 3 I , S*  I  3.  II ,  Kl  3, 2 0 1  *  10  I  12 ' I 
CnNMON/L ABELS/  LABI 161 • *HEO 111 , XM* FHEDI61 ,FH ,UHEOI  ol ,UH, RMED ! A J , PH 
X  ,  A*0*Ol,AW0*O?,AW0KO3,HEA0( 121. STAAT, CEASE, |PG,N$T*,NO«OI 301 
DATA  TMOBf)l,TNOA02/  6H**«EAL.  4H  T|NE«  / 

,  INPUT  TMF  NUMBER  OF  TINE  STEPS.  PAINT  INTERVAL,  tine  increment, 

.  NEwNAPK  OANPINO  TERN,  AND  PAINT  SUPAESSE*  CODE  FOR  ERPUCTf 
,  INTEGRATION  (BETA  -  01  . 

A  E  AO (  I  TPS  •  1 0001  NSTEP, NPRT.OT, DEL, NUNPLf, NPROP, NFO'.C-RRR 
IFINPRT.  *.01  NP* T  ■  1 

,  OUTPJT  TH  INPUT  OATA 

WRITEIITPftttOOOI  HEAO,IPG,NSTEP,NPRT,Or  »OEL  UHPLT , NPROP. NFORC 

IFINFOAC.OT.O.ANO.NPPCP.GT.OI  NRITEIITP*,40f)ll 

IFIRKK.EO.OI  WRITEI ITP6, 20021 

IFURR.NE.OI  MRITFSI7P4, 20031 

IPG  ■  IPG  ♦  I 

1EWINP  7 

IFINUNPLT  .LE.  01  GO  TP  40 
REWINO  6 
WRITEI  I  TPfcr  2005 I 
00  33  N-I.NUNPLT 

«EAO  1 1 T°5,  10061  INFO  AT  AIN, I) ,  I  *  1 , 3 1 
«RITE  I  ITP6, 20061  N, INEOATAI N, 11,1-1,31 
CONTINUE 

.  SET  THf  CONSTANTS  AND  INITULI2E 

UT2  -  OT*OT/2. 

CPO  ■  1.3  ♦  OELUOT 
ONt)  -  |.S  -  DEL  I  *0T 
HE  AO  I  I  1  I  •  T 40*0! 

HE  ADI  121  ■  U0!O2 
NSTEP  ■  NSTEP  *1 


TINE  •  0. 

T 3  •  0.0 
T 4  ■  0.0 
75  •  0.0 

I  REUSE  •  .FALSE. 

00  50  N  •  ItNOEG 

50  NA$S (N )  •  0.0 

00  35  I  •  l.NSTF 
35  LOIII  ■  0 

IFINUNPLT  .GT.  b*  CALL  PL 2ER0I N, N,N , N.NASS, NASS , NAS S,  NAS S I 
IFI IR1NFL1, 11/100,  GE.NU«FL-|J  IAEUSE*  .TAuE. 

C 

C  COMBINE  BOUNDARY  CONDITIONS  INTO  A  SINGLE  VECTOR,  E. 

C  HNI  .GT.  BIG  INPLIES  0  I SPL  ACENENT  BC. 

C  EINI  .LE.  BIG  IMPLIES  FORCE  BC. 

C 

BIG  •  Fill 
SIT  ■  Fill 
00  54  N»2,NDEG 
CC  •  HNI 

IFICC  .LT.  sm  SIT  •  CC 
IHCC  .GT.  BIGI  BIG  •  CC 
54  CONTINUE 

SIT  -  BIG-SIT  ♦! • 

J  ■  0 

00  51  N  ■ I , NUNNP 
IC  ■  ICOOIN) 

IL  "  100000 

00  57  1*1, NOF 

IE  I IC  .LT.  IL I  GO  TO  57 

56  IC  ■  IC-IL 

IF  I  |C  .GT.  L)  GO  TO  56 
FlUJI  ■  F|  »J)  ♦  SIT 

57  IL  •  IL/IO 

51  J  •  J  ♦  NOF 
C 

C....  CONPUTE  GLOBAL  NASS  NATRIK 
C 

NSRIP  •  0 

00  80  N  ■ 1 , NUNEL 

N  •  0 

DO  55  J  *1 , NEL 
R  "  I XI  J,  N) 

I  FIR  .LE.  0)  GO  TO  63 
RR  ■  U-1UN0F 
00  61  U1,ND!N 

61  R I  I , J I  -  XV  T I  I , R ) 

00  62  I  ■  1 , NOF 

62  LOINH)  ■  R R ♦  I 
59  N  ■  N  ♦  NDF 
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63  IF (NSRIP  .GT.  OJ  GO  TO  60 

nsRiP  -  irineli.ni/ioo  ♦  1 
NA.'tCCUXINELl.NI,  101 
ON  •  TYPE  I N A| 
no  64  I  -  l.NSTf 
FORfEJI ,11  •  0.0 
JRCEI I  ,21  -  0.0 
DO  64  J  -  l.NSTF 

64  FSTIFI J  ,  j)  «  0.0 

CALL  ELNLIOIN,NA,NOINf NOF, NEL|NELL,NSTF,NVEC,NSITV,NCT,DN,0,RV2, 

X  (X,F.r0RCE,ESTlF,U,VECT,3I 
NR  I TF I  7  I  ESTIF 
J-MOOUXINELI,NI  ,1001/10 

I  F  I  J  .GT.  01  CALL  PRTNAT I  HE AO , I PG. N, NSTF , E ST  I F , FORCE  1 1 , 2  I , LO , NS TF  I 

C 

C....  CONPUTE  AN  ESTIMATE  TO  THE  LARGEST  FREOUENCV  IN  THE  NESH 

C 

OTHAX  •  0. 

00  65  I  ■  I  ,M 

IFIFfjRCEl  1,21  .EO.O.DI  MR  I  TE  I  I  TP6, 40001  N,  I 
| F (R  ONCE  I  I, 21. EQ. 0.01  GO  TO  65 
SUN  ■  0. 

00  66  J  -  1,N 

66  SUN  -  SUN  ,  ABSIESTIFII ,J| | 

SUN  •  SUN/AHS  (FORCE  I  l,M  I 
IFISUN.GT.OTHAXI  OTNAX  -  SUN 

65  CONTINUE 

60  NSRIP  ■  NSRIP  -  I 

C 

DO  70  I  ■  I , N 
J  •  LOIII 

70  NASSIJI  •  NASS  I J I  •  FU*CEI!,2I 

HO  CONTINUE 

r. 

C....  NAXINUN  THE  STEP  ESMNATE 

C 

OTNAX  -  2. / SORT  I OTNAX I 

MRITE  IITP6.200I  I  OT  **AX 

IF  I RRR.FO.D.ANO. OTNAX.LT.nT  I  RETURN 

MR  I TE 1 1 TP6, 2010 1  IHEAOIII,!-! ,101,1 PG 

IPG  ■  IPG  •  I 

<CT  .  50 

CALL  TICT0CITYNE.2I 

c 

C....  LOOP  THROUGH  FOR  EACH  TINE  POINT,  STARTING  MJTH  TINE  ■  0.0 

C 

*  AC  T  »  1.0 

IF  INPROP. GT. 01  FACT  •  PRPPLDI T I NE, NPROP I 
no  700  NT  •  I , NSTEP 

IFINPROP.GT.  01  FACT  .  PRCPLOIT|NE»OT,OI 


C. 

c 


68 

90 

C 

C., 

c 


93 

C 

C., 

C 


IF  I NFORC . GT ■ 0 1  CALL  RESETI-NFORC , NUNNP, NDF, FI 

CONPUTE  ANO  PRINT  N0N-2ER0  LOAOING  FOR  EACH  TINE  POINT 

WRITEIITP6,  20151  'IT 

NCT  .  NCT-6 

00  90  N-l.NOEG 

IFI  FINI  .GT.  BIGI  GO  TP  90 

UOOINI  ■  FINUFACT 

IFIUODINI  .EO.  0.01  GO  TCI  90 

NOOE  ■  IN- 1  I /NOF  •  1 

NF  •  N  -  NOF* | NOOE-1 I 

NCT  -  NCT  -  » 

IF  I NCT  .GT.  01  GO  TO  BB 

WRITEI I TP6, 20101  IHEAOI I  I , I -1 , 10  I , I PG 

IPG  ■  IPG  ♦  I 

NCT  ■  50 

WRITEIITP6,  202DIN00E , FHEO INF ) tUOOI N) 

CONTINUE 


NPR  ■  .TRUE. 

IF| (NT/NPR  T I *NPRT  .EO.  NT  I  NPR  ■  .FALSE. 

NPL  •  .TRUE. 

IFINUNPLT  .GT.  01  NPL  ■  .FALSE. 

I  FI NPR  .ANO.  NPL I  GO  TO  ®3 
CALL  TICT0CITVNE,4| 

T4  ■  T4  *  TVNElAI 

.Ctb«OISyRSINU',NP'NU,'EL,,<U""*T,N!,1"*NOF'NE'--N£LI.NSIf,NVEC,NOtO, 
«  TYPEiO,lCOO,«»Z,F,!K,u,FO#CE.E5TIF,UOilOuriO.OI 
WRITEI I7P6, 2010  I  I  HE AO  III , I • 1 , 10 1 , I PG 
IPG  ■  IPG  *  1 
NCT  •  50 

CALL  TIC  TOC  I  TYNE, 5  I 
T5  ■  T5  ♦  TVNEI5I 
CONTINUE 


GET  THE  CURRENT  ACCELERATION  BV  EQUILIBRIUM  EQUATION. 


NSRIP  ■  0 
RFWINO  7 

DO  400  N  ■  I , NUNEL 
I F ( I  REUSE  I  GO  TO  96 
IFINSRIP  .GT,  01  GO  TO  95 
CALL  TICTOC ITYNF.4I 
T4  ■  T4  ♦  TYNE  1 4 ( 

NSRIP  •  I  X I NEL 1 1 N I / 1  00  *  I 
0F4OI7I  ESTIT 
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CALL  TICT0CITV-E,3I 
13  •  T»  *  TVME13) 

r 

95  NS*  I  P  «  NSKIP  -  1 
9ft  *  ■  0 

ACTE  LG  •  • TPUE  • 

00  92  J  •  I »NFL 

K  •  I V  I JtN> 

IFIK.IE.OI  GO  tO  94 
*K  ■  1K-1I«NDF 
00  91  I  •  l.NOE 
CC  •  U(KK*I ) 

IF  (CC.NE.O.OI  ACTELG  «  .FALSE. 

UU  I  **•  I  '  •  CC 
91  LOI M* l |  -  KK*1 
72  M  •  M  ♦  NOF 

I F ( AC  TFLG)  GO  TO  400 

C..«.  ACCUMULATE  THE  MATRIX  PRODUCT  OF  ESTIF*UU 
C..«.  COMPUTE  IMASS*U00  ■  F  -  E<TIF»UU  ) 

C 

94  00  250  I  ■  I »M 

CC  ■  0. 

00  200  J  l.M 

200  CC  •  CC  ♦  EST I  FI !,J)*l'Ui 
K  •  LOI  1 1 

2  50  UODIK)  •  0001  *  I  -  CC 
400  CONTINUE 

C....  GET  THE  ACCELERATIONS  AND  VELOCITIES  AT  THE  NT  TIME  STEP 
C 

00  -  0.0 

IFINT.GT.il  00  •  GMO 
DO  500  N  •  1 t NOEG 
CC  ■  E(NI 

IEICC.LE.niGl  GO  TO  550 

C....  MODIFY  FOR  PRESCRIBED  DISPLACEMENTS 

r. 

UINI  •  CC  -  M£ 

UDN  ■  0. 

UPON  •  0. 

GO  TO  560 
550  UDN  •  UDINJ 

JDON  •  UDOCNI 
XMftSS  •  HASSINI 

If ( xMASS.NE .0.01  UDPN  •  UOON/XMASS 
UDN  •  UDN  ♦  DD*UOON 

C....  CURRENT  VELOCITY  AND  ACCELERATION  HAVE  BEEN  OETERMINED,  PRINT  OR 
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SUBROUTINE  PACKOIO,  I  .  Cl  1,02,  C33,M) 
DIMENSION  01 3 » 2 1 »1 1 
GO  TO  1291,293.2941*1 

291  CONTINUE 

01  1*  I, Ml  •  Cll 

01  1*  2  »M)  •  C 1 2 

01  2*  2, M)  •  Cil 

0(  2,  l.M)  •  C12 

01  3,  3, Ml  ■  4.0*C33 

RETURN 

293  CONTINUE 

0U»  9, Ml  •  C12 
012*15, Ml  -  C12 
013, IB, Ml  •  Cll 

294  CONTINUE 

0(1*  1 , M )  •  Cll 
Oil*  5, M)  •  C 12 
Oil, 10»M>  ■  C33 
0(1, 16, Ml  -  C33 
012,  2 , Ml  «  C 33 
D I  2 »  4, Ml  «  C33 
0(2, 11, Ml  •  Cll 
0(2, 17, Ml  •  C33 
0(3,  3, Ml  •  C33 
0(3,  T,M»  •  C33 
0(3, 12, Ml  •  C33 
0(3, 14, Ml  -  C 33 
PETURN 
ENO 


C..«,  PLOT  AS  REQUIRED. 

C 

560  CONTINUE 

C 

C....  UPDATE  THE  SOLUTION  FOR  THE  NEAT  TIME  STEP 
C 

U(N>  •  UINI  •  OT*UON  ♦  OT 2 *UOON 
500  UOINI  ■  UON  ♦  GPOPUOON 
TIME  •  TIME  ♦  OT 
700  CONTINUE 
C 
C 

CALL  TICTOCI TYME ,41 
T4  •  T4  ♦  TYMEI4I 
II  •  NSTEP 

IFtNUMPLT  , NE •  01  CALL  PLOTGO  I NUMfL ,NOIM,NEL, 1 1 ,U,UO,UDO, FORCE  I 
CALL  TICTOCI TYME ,6  I 

WRI TE ( ITP6, 2030)  TYME 1 1 1 *TVME 121 ,T3,T4,T5 ,TVM£ 16 1, TVMEI T I 
RETURN 
C 

C....  FORMATS 
C 

1000  FORMAT  1 215, 2F1 0.0,415) 

1006  FORMAT  I  31 51 
1010  F0RMATIF10.0) 

2000  FORMAT I IHl » 12A6, SOX ,4HPAGE , 1 4 //26H  EXPLICIT  TIME  INTEGRATION  // 

X  5X , 25HNUMBER  OF  T1 MF  STEPS  -,15/ 

X  5X, 2  5HRR I  NT  INTERVAL  -,15/ 

X  5X, 25HT I  ME  INCREMENT  -,E12.4/ 

X  5X,25HNEMMARK  DELTA  DAMPING  -,E12.4/ 

X  5X,25HNUMBER  OF  STRESS  PLOTS  -,15  / 

X  3X , 25H NUMBER  PROPORTIONAL  LOADS, I  5/ 

X  5X, 25HLARGEST  FORCE  NOOE  -,15/IK) 

2001  FORMAT!  5X.30HMAXI  MUM  TIME  STEP  ESTIMATE  IS  ,  I  *>E12  .5/3 

2002  FORMAT ( 5X  »23HSTABI  L I  TV  CHECK  0ESIRED/1X) 

2003  FORMATI 5X .26HSTABI  L I  TV  CHECK  OVERR I OOEN/ 1 X I 

2005  FORMAT I4X,  50H  DESCRIPTION  OF  STRESS  EVOLUTION  PLOTS  TO  BE  MADE.  / 
X5X.I0H  PLOT  NO.  SX,BH  ELEMENT ,7X,9H  XYZ-C00E,6X,9H  SIG-COOE  / I 

2006  F0RMATI4ITX  15,3X1) 

2010  FORMATI IHI ,10A6,42X,4HPAGE, 14) 

2015  FORMATI //44H  NON-ZERO  LOADING  FORCES  FOR  TIME  INTERVAL  -  13  // 

X  5X,5H  NODE ,5X, 12HDEG.  FR EEOOM, 5X , 6HF0RCE  /) 

2020  F0RMATI5X,IS,5X,A6»!1X»E13.5) 

2030  FORMAT I1HD,6IX,12HELAPSE0  TIME  /// 

X  50X,  2 5H INPUT  PROPERTIES  ANO  MESH  F10.3/ 

X  50X,  23HFDRM  LUMPED  MASS  VECTOR  F12.3/ 

X  50X ,  25HELEMENT  STIFFNESS  TIME  F10.3  / 

X  SOX,  10HEXPLICIT  ALGORITHM  F17.3  / 

X  SOX,  2 SHOUT PUT  STRES  ANO  OISPL.  F10.1  / 

X  SOX,  13HPL0TTING  TI»  .  F22.3  / 
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SUMOUMNE  TICTOCIlY«r,  II 

c  SUWROUTINE  TO  TIME  PROGRAM  SEGMENTS  AS  MEASURE  OF  EFFICIENCY 

C 

0| WENS  I  OS  TYNE  I  6) 

IT  | I  . LE .  0)  GO  TO  100 

rut-  SECOND  (Til 

TYNE  (II  •  TI  -  TO 

TYHEIB)  •  TYNECil  •  TVWECtl 

TO  •  Tl 

RETURN 

100  CALL  SECONO ( TO  1 
RETURN 
ENO 


SURROUTINT  RR  I  C* 2 1* » S » T  i  NO  I*i  ME  1 1  NS  1 0(  > 

0!  PENSION  NI(l21»N2HJt*N))  I J  t  «M)9(  (121  |S  20*01 12  >*  S3O40I  1 2)  *  SSI  II 
DIMENSION  COiNIll 

COMMON/ WAR/  KjAC.SMAA(ittJO)*SG<  >•))*!•()*  ll,l|  I.  201*101  120 1 
OAT A  NODE /?,4,6,l«3,IO,II«I2*l%tIA«IA«20/ 

DATA  Nl/1,2, 1*2,  3*>,  >,)*  1*2, 1,2/  •  N2/2*  Hi  2*  I*  1  •  I  *  1 1 1  •  2  •  1. 2  •  t/ 
OATA  N3/3, 1, 3, 1, 2*2,2, 2, 3, 1, 3,1/ 

OATA  S20P0/*|S|*«1|  • ^ *5,  .4/ 

OATA  S10RO/-.S*  .S.Mr.lr.S.-.t,  .>*  ,S*  .}«-•$/ 

SSIII  •  A 
SSI2 )  •  S 
SSIll  •  T 
M  •  4 

11  "  I 

iriNSlOE.EQ.il  GO  TO  110 
«I  •  12 
II  ■  2 

C ••••  AORM  NIOSIOE  SHARE  JUNCTIONS 
00  too  LaI » 12 
N  -  N03EILI 
I  -  NKll 
J  •  N2KI 
R  ■  N3IL 1 
SJ  •  S20A0I11 
SL  •  S3DR0IL1 
RP  •  I.  -SSII1AP2 

SP  •  O.S  ♦  SJASSIJ! 

TA  .  O.S  ♦  SLASSIK1 
SHAPEIIiN)  ■  -2.0»SS(I  USPATA 
SHAPE! J*N)  •  SJARPATP 
SHAPE(R»N)  ■  SLARPASP 
100  SHAPE ( 4,N)  -  RPASPATP 
Caaaa  EDAM  CORNER  SHAPE  FUNCTIONS 
1 10  SJ  "  -O.S 
K  •  0 

00  2 SO  J  ■  1*2 
l  •  I 

00  200  1  •  5, A 
RP  ■  .5  ♦  S2QRDI I  JAR 
SP  •  .S  A  S30R0I Cl *S 
TP  •  .5  ♦  SJAT 

SHAPE C 1 *1  *Kl*  S20ADI 1 IASPATA 
SHAPE  1 2*L  i  K 1  •  RPAS30ADU  1ATA 
SHAPE! 3*L  ♦  K )  ■  RPASPASJ 
SHARE!  4,L  a  Kt  ■  RPRSRATP 
200  L  -  i  a  LI 

K  ■  KI 

2 SO  SJ  -  O.S 

IEINSIOE.EQ.il  GD  TO  360 

CAAAA  CORRECT  BASIC  CORNER  FUNCTIONS  BY  PROPORTIONS  OE  M OS  IDE  FUNCTIONS 
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n  •  a 

L  •  9 

00  350  I  -  1,8,2 
DO  300  J  »  1,4 

5MAPEU.il  -  SHAPE  I  J,  1 1-0. 5*1  SMAPEUt!AlJA$HAPEIJ,KlASHAPEIJ,in 
300  SHAPE  I  J,  I'  12I»SHAPE(J,IA12)-0.5A(  SHAPE! J , I A 1 3 1 aSHAPE 1 J, K A  12  I 

X  ♦  SHAPE!  J,U) 

K  .  1  ♦  1 

350  l  •  L  •  1 

CAAAA  FORM  THE  JACOBIAN  OETERNANANT 


00  370  1 
00  370  J 
SM  I ,  J  I  • 
00  400  I 
no  <,oo  j 
00  4*J0  x 
SMI ,  J) 


1 ,3 
1*3 
0.0 

•  1* NO  IN 

•  1.N01N 

•  liNEl 
SK( I, J) 


IPIN0IM.EQ.2I  SK ( 3 , 3  I  •  1.0 


SHAPE  I  J  |K  |  A  KI  I  ,  K  ) 


SGI  1,1) 

SGI  2  *2  I 
SGI  3,31 
SGI  1,2) 

SCII, 31 
SGI  2,1  I 
SGI2.31 
SGI  3,1 1 
SGI  3,2) 

X J AC  •  0.0 
00  <*>00  1  •  I  ,  NQI  w 
XJAC  •  X J  AC  •  SGI  I 
OO  800  J-UNEL 
DO  710  1  ■  1,ND IN 
TEMP  .  0. 


SK  l  2 , 21  •  SM  3 ,3) 
SK  I  1 ,  1  )  «SK  |  3,  3  ) 
SKI  1 , 1 | • SKI  2,2  I 
-SKI  1 ,2)  ASKI3.3) 
SKI1,2I*SK|2,3) 
-SM2,1IASM3,3) 
-SK)  1,  1IASM2, 3) 
SKI2*1)ASK| 3,2) 
-SKI  1, 1 ) A  SK  4 3,21 


SK (2*  3 ) *SKI 3,21 
SMI,  3)  *SKl3,  II 
SKI  1 , 2  I *SK( 2*1) 
SKI  I «  3) ASK ( 3,2) 
SKI  1*3)  *SK  I  2,21 
SK 12, 3) ASK  I  3, 11 
SKI  2, I  I ASKI I, 3) 
SK)2»  2  I *SK( 3,1) 
SK  1 1 , 2) ASK (3*1) 


DO  TOO  K  •  1 , NO  I H 

700  TEWP  «  TENR  A  SGI K, 1  1 ASHAPEIK , J 1 
710  COIMIII  «  TEMP 
00  BOO  I • 1 , NO | N 

»oo  shape i i , j i  •  colni i ) 

RETURN 

ENO 


CAAAA 


402 


406 

404 


SUBROUTINE  SL003  I  NO|H,  NDF,NOP,NPRES  ,  IPRES.PR,  XZ  ,  FS  1 
01  HENS  I  ON  |PRESIBI,PRIBI,FSI6,B) 

CONNON/GAUS/  L I N, SGAUSS 1 5 , 5 1 , WGAUS  51  5 , S  I 

CONMON/SMAP/  X JAC,  SHAPEI 4 , 20 1 , SGI  3 , 3  )  , SK ( 3 , 3) , X  I  3, 20 1 , L 01 120 1 
NS  I OE  ■  NPRES  -  I 
LIN  ■  NS10E  a  1 

COMPUTE  NORMAL  PRESSURE  GENERAL! ZED  FORCES 
00  404  JJ  -  I , L I M 
TT  ■  SGAUSS I J J, LI  Ml 
WT  -  WGAUSS ( J J»L I  Ml 

CALL  BR!CK2ITT,-I.,-|  .,  NO  IN, NPRES* NS  I  OE  ) 

PN  •  0* 


RR  ■  0*0 

00  402  I  *  I, NPRES 
RR  •  RR  f  SMAPEI4.I)AKI1,|1 
PN  ■  PN  ♦  PR  1 1 1 ASHAPE1 4  *  I  ) 
PN  ■  PNAHTARR 


00  406  I  •  1, NPRES 
RR  -  SHAPEI 4, 1 1 APN 
On  406  J>  1 , 2 

FSIJ,|)  •  PSIJ.D  a  SGI  2*  J  1*RR 

CONTINUE 

RETURN 

ENO 


»«**  %% 
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VMHIII'MMOI  I.UM.If 
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Cl?  •  Cll 
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SUBROUTINE  ELWT13IN,MAfND(M,Nr)F,NEL,NELl,NSTF,NSIZV,NVEC,MCT,OM,D, 
<  XYZ, IX,F,FORCE,EST|F,U, VECT, I  SHI 

DIMENSION  D I  hi,  II  ,XYZ(NO|M,l),IX(NELl,ll,FINDF,l  I.FDRCEINSTF.2  l, 
X  E5T1C (NSTF.NSTFJ .VECTINSIZV.NVECI.UIll 

DIMENSION  V(3«20),XXf3),Slt7I.S2t7).S3(7I 

*.  f*B  5 1  hi iSIG(6l,TABl(lil , T AH? 1 11 1 , SHED *3 , 3 1 , THE  0 ( 6) .OVI3.3) 
m.  STUMK.27I.  ODC  3 .201  ,f  T«  3. 201*  EE (61.  COI 6. 6! 

REAl  LAHL 

LOGICAL  NRR,NRL,NORPNT 

CO*MON/OYNAMD/T  IME»NSIGI?),NT.NSTEP,DT,  NUMPLT  *NEDA  fA  I  20.  31  .NPR.NRL 
CDMM3N/L ABELS/  L ABL 1 6  I . XHf D (3  I .  XH,  FHEO (6 > , FH .UHEOI 6  I .UH , RHfcO 1 6  I . RH 
X  ,  AWORDl ,  AWDRP2.  AM0RD3.  HEAOI 12 1  •  START  .CEASE.  IPG,  NSTR  ,  WOROI  30) 
COMHON/SHAR/  XJAC.  SHARE  1 4.201  .SGI  3. 3 1 .  SK 1 3,  *il ,  X 1 3. 201  .L  01 1201 
CDMMON/TAOES/  (TRS.ITR6 
COMMON/VALUES/  NCI i CO Nli C0N2.C0N3I  31 
DATA  SI/  0 .  ,  - 1 .  ,  1.,  0.,  0,,  0.,  0./ 

OATA  S 2 /  0.,  0.,  0..-U.  1.,  0.,  D./ 

OATA  S 3/  D.,  0.,  0.,  0.,  0..-1..  1./ 

OATA  TA81I  1 1*  TAB2( 1  I / SHI  1 HO. 1 7  ,8H  (  8X  /.SMORO/lH)/ 

DATA  SHED/6H  KX-.6H  *V-,6H  XZ-.6H  XY-.6H  YY-, 6H  YZ-. 

X  6H  XZ - , 6H  YZ-.6H  ZZ-/ 

DATA  FMORD, EMO’O, XW0R0/8H, 0PF12.2.8H,  1PE12.3,8H  ,  12X  / 

OATA  SH(EH,  8LL NX /6HS TRESS. 6H STRAIN, 6H  / , YWQR0/8H,  A5 , 17  / 

IF! I  SW.GT.4  I  GO  TO  400 
NSIDE  -INEL*U/N0IM**2 
GO  TO  11,2,3,41,15* 

C****  INRUT  MATERIAL  PROPERTIES 
C  *••• 

C  •••• 

r  0(13, MAI  IS  MASS  OENSITY  FOR  OYNANIC  OPTION 

1  RE  AO  1 1  TPS ,  1D00 1  I  DU  ,  MA I  ,  I  «1 , 131 

WRI TEIITP6, 20001  IO(I»MA|,I  -1,131 
RETURN 

2  CALL  CK8R(K(N0IM,NEL,0MI 
RETURN 

3  LIM  -  NSIOE 
NCI  ■  1 

IFIN0IM.E0.2I  LIM  -  LIM  ♦  1 

(FtN01M.E0.21  NCI  ■  0 

CALL  INTEGLfLri.NCl.N01M, LINT. STUM! 

C«««*  SET  UR  MATERIAL  PRORERTIFS 
RO  ■  0(13, MA) 

CALL  MDOULI CN,MA,NVEC,VECT,0,0D,CT,N0IM| 

LI  ■  D 

L  ■  0 

DD  24  XX  -  l.N'lF 
00  22  LL  ■  XX.NOF 
00  20  I  -  1 , NO. M 
L  ■  L  ♦  1 


LI  ■  LI 

1 

00  20  J 

l.NOIM 

20 

CT!  J.LI 

DO! J.L1I 

22 

LI  -  LI 

3  -  NOF 

24 

LI  ■  LI 

3*13  -  N 

C****  FORM  STIFFNESS  AT  EACH  INTEGRATION  POINT 
00  180  II  -  l.LINT 
SS  -  STUMll.III 
TT  -  STUWI2.III 
UU  -  STUH(3,m 
MU  ■  STUM ( 4 .  I  II 

CALL  8RICX2I SS.TT.UU.NOIM.NEL.NSIOEI 
OVOL  ■  MU/XJAC 

C*M*  COMPUTE  A  LUMPEO  MASS  MATRIX 
II  -  0 

00  110  1*1. NEL 

TEMP  ■  RO*  SHAP  E ( 4 , 1  I  * XJAC* MU 
00  100  XX  ■ 1 .NO I M 

100  FORCE ( 1 1 «KK . 2  I  ■  FORCE! II +KK.2I  *7EMP 
110  II  ■  11  ♦  NOF 
LI  ■  0 

DO  170  XX  ■  l.NDF 
00  170  LL  ■  XX.NOF 
II  •  XX 

00  160  I  ■  l.NEL 
J1  ■  LI 

00  130  J  »  l.NOIM 
J1  ■  J1  ♦  1 
TEMP  -  o. 

00  120  X  >  l.NOIM 

120  TEMR  ■  TEMP  ♦  SHAPE  IK , I I*CT( X  ,  J1 1 
130  SIGI  -J  I  >  TEMP*0?0L 
L  ■  1 

IFIKK.EQ.LLI  L  *  I 
J1  -  LL  ♦  NDF*| L  -  1) 

00  150  J  ■  L, NEL 
TEMP  ■  0. 

00  140  X  >  l.NOIM 

140  TEMP  •  7EMP  ♦  SIGIXI*SHAPEIX, JI 

FSTIHU.J1I  -  E  STIFI 1 1  #  Jl  I  ♦  TEMR 
150  Jl  ■  Jl  4  NOF 
160  II  -  II  f  NOF 
LI  ■  LI  4  NOIM 
170  CONTINUE 
180  CONTINUE 

C*M*  CONSTRUCT  SYMMETRIC  PART  OF  MATRIX 
LL  ■  NSTF  -  1 
00  190  I  ■  l.LL 

X  -  I  4  1 

00  190  J  >  X , NSTF 


B  AGE  71 


EST 1 F ( (  •  Jl  -  ESTIF1I.JI  4  EST1FIJ.II 
190  EST)MJ,1)  -  ESTIFU.JI 
RETURN 

4  NL  ■  (ND(M*(ND!M4l) J/2 

CONI  ■  4S./AI AN( 1 .1/2. 

C**4*  SET  'JP  local  cocxoinates  and  displacements 

CALL  MODULI  IN, MA.NVEC , VECT ,0, V,CO, NO  I  Ml 
DO  210  J  •  1, NEL 

X  ■  I  XI J,NI 

XI  ■  NOF • IK  -  1  » 

OU  210  l  ■  l.NDF 

210  V I L  »  J  I  ■  UIL4X1? 

00  3S0  II  ■  1,N'TR 
NORRNT  ■  NSIGI 1(1  4  NPR 
NRL  ■  1 

IFINUMRLT  .LT.  r.O  TO  2  30 
DO  220  NP  ■  1,NUMRLT 
IFINEDATAINP, 1)  » NE .  N)  GO  TO  220 
I F INEPATAINP.2I  .ED.  Ill  NPL  ■  0 
220  CONTINUE 

230  IFIUPL  .AND.  N3PRNTI  GO  ID  350 
R  >  S1IIII 
S  •  S2IIII 
T  »  S3IIII 

1FIN0IM.EQ.21  T  -  -1.0 
CALL  BRICX2IR,S,T,ND)MtNFL,NSIDEI 
C***"  FORM  DISPLACEMENT  GRADIFNTS 
00  ZSD  l  ■  1 , NOF 
00  50  J  •  l.NOIM 
TEMR  ■  0. 

DO  240  X  ■  1 , NEL 

240  TEMR  .  TEMP  •  SHAPE ( J , X  I *V(  I , x  I 
250  OVI I  ,J>  ■  TFMR/XJAC 
DO  260  I  -  l.NOIM 
XX  111  n  0. 

DO  260  J  ■  1 , NFL 

260  XXIII  -  XXII!  ♦  X  I  I  ,  J  l*SMAPEI 4, Jl 
C**«*  FORM  STRESS  -  STRAINS 
x  -  0 

TEMR  .  0. 

00  270  I  •  l.NDF 
TEMP  ■  TEMP  »  OV<l,I) 

00  270  J  ■  I, NOF 

X  *  K  »  1 

str.ixi  «  d.o 

270  EPSIX1  ■  0. 6* (OVI I i Jl  ♦  PVIJ.III 
EE  1 1  l-FPSI 1  I 
EE  12  I »FPSI 3  I 
EE  161*2. *fcBSI  21 
I F I NQlM.EQ.?  I  GO  TO  275 


PAGE  72 


EEI2I-EPSI4! 

EE  t  3  l -CPS  161 
EEI 4»*2.*EPSI 3! 

EE(5!»2.*FPSI5! 

275  00  285  1-1, X 

Xl-I 

IFIf.EQ.Kl  X 1 ■ 6 
CON-O.O 
DO  280  J-l.X 
L 1  ■  J 

IFIJ.EQ.XI  Ll-6 

280  CON-CON*CO I XI .LI I*EE(L1 1 
285  SIGIII-CDN 
CON-SIGIKI 
SIGIXJ-SIGI2  I 
S I G( 2 1 ■ CON 

IFIN0IM.E0.2I  GO  TO  288 
CON-SCGI 3! 

SIGI31-SIGUI 
SIGI 41- SIGI 61 
SIGI6I-C0N 
28B  CONTINUE 

C..«.  COMPUTE  INVARIANTS  FOR  TWO  0  RROBL EM S 
I F I  NO IM.NE • 2  I  GO  TO  290 
CON  •  1.0 

F1NV  -  I S I G 1 1 1  ♦  SIGI 31 1/2,0 

SO  I F  -  ISIGIll  -  SIGI 31  1/2.0 

CRAO  -  SQRTI SOI F*SO| F  4  S IG I  2 |*S IGI 2  1 1 

SIGI4!  ■  IF  INV  ♦  CR  AO  )*C.ON 

SIGI5I  ■  IFINV  -  CRAO) *CON 

S I G 1 6  I  -  0.0 

IF1S0IF.NE.0. I  SIGI6I  ■  CON  1 • AT AN2 I S I Gl 2 1 , SOI  F  | 
290  CONTINUE 

MCT  ■  MCT  -  1 
IFIMCT.GT.OI  GO  TO  330 
C****  SFT  UP  HfcAOS  FDR  PRINTOUTS 
I  ■  2 

00  300  J- l.NOIM 
T A 8 1 1 II  -  FMORO 
7A82III  ■  KWORO 
300  I  -  J  4  1 

OD  310  J  -  1,6 
TABU  II  ■  E WORD 
1A82III  •  EWUR  0 
310  I  -  I  4  1 

T  AS  1(11  ■  SWORD 
TAB2III  -  SWORD 
TA82I2)  •  YWDRD 
X  •  0 

00  120  I  ■  l.NDF 
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OH  320  J  »  l,NOF 

X  «  K  *  1 

320  ThEPIK)  >  SHFOI I , Jl 
IFINOPRNT1  GO  TO  340 

WRIT? I (TP6,200?)  HEAD.T|ME»  IPG, (XHEDIt)  ,  KM,  1- 1 , NOI H  |  , 

X  ( THEOIII ,NL ) 

WR|TFIlTPb,2D01  J  (  BLANK,  BLANK,  I-1,ND(M) , (  ThEOI  I ) ,EH, I-l  ,NL) 

IFINOM  •  FQ*  2’  WRITE  |ITP6,3DD0» 

IPG  ■  IPG  ♦  1 
**C  T  -  15 

330  l  F  t  NO*  ‘NT  J  GO  TO  340 

WRI  TE  <  .  ’PA,  TABU  N,  (XXI  I  ),  I-1,N0(M),  SIG 
WRITEII  ’6,TAfl2)  OM,MA,  CEPSUI  ,!«1,NU 
340  IF (NPL »  GO  TO  350 

CALL  PLDATA(NUMEl,NOtM,N, ||,THEO,XX, SIG, FORCE  I 
35D  CONTINUE 
RETURN 

400  ITG  -  0 
RETURN 

C....  FORMAT  STATEMENTS 
1000  f DRMAT|6FID.D/7F1D.0> 

2000  FDPMAT(/5X,14H ELASTIC  MODULI  // 1 3X4MC- 1 1 , 9 X4HC- 12 , 8 X4HC- 1 : , 

1  8X4MC- 22 »  8  X4HT -2  3 ,  8  X4HC.  -  3  3  » 8  X4HG-3  2 » 8X4HG-1 3»8X4MG-12» 

7  //5X,  1P7E)2.4//13X4H8-M.AX4HB-22,0X4MR-33,5X7HOENSITY//SX  1P4E12 
3  .4//1 

2001  F0RMAT(8X,9(2A6M 

2  00  2  FORMAT  I IM1, 1 2  A  6 , E 1 3. 5 , 20 X, 4MP AGE, 1 3/ /5X , 14HEL6 NENT  STRfcSSES// 

1  1 X, 7HELEMENT ,9( 2A6) I 

3  JDD  F0PMAT(72X,8Hl-STRESS,4x,8M2-S.RESS,7X,5HANv5LE  1 

END 


SUBROUTINE  NOnuil  ( N, MA , NVEC , VECT ,0 , 00 , C , NOI Ml 
DIMENSION  0(63,11 
DIMENSION  C I  6 , 11,00(1,11 
c  INITIALIZE 

DO  15  11-1,6 
DO  15  J J* ( I ,6 
15  C (  I  I ,  J J I *0 . 

DO  2D  11-1,3 
00  20  JJ-1,  IS 
20  00(1  I , JJ i-D. 

CC-OllfMA| 
ci  i,n-cc 
0D(  1,1>-CC 
CC-DI2.MA) 

CI 1,21-CC 
00(1,5) -CC 
CC-DI3,MA| 

CI1,3)-CC 
0D(1,9)-CC 
CC-0(4,MAJ 
Cl  2,21 -CC 
00(2,11) -CC 
CC-DI 5, MA ) 

C(2,3)-CC 
001 2*15 ) -CC 
CC-0(6,MA) 

C I  3 , 3  )  "CC 
00(3,10) -CC 
CC-DI7.-4A) 

C I  4, 4) -CC 
001 3, 3) -CC 
0013,7)  -CC 
001 1,16)-CC 
CC-OIS.MAJ 
C I  5,51 -CC 
OOC  3 , 12 )-CC 
0013, 14)-CC 
00(2, 17)- CC 
CC-0I9,MA) 

CC-019, MA ) 

CC- 01 9 , MR  ) 

C(6,6)-„v 

00(2,2) -CC 
00 1  2 , 4 ) -CC 
O0U,10)-CC 

00  25  n-1,6 
00  25  JJ-1, II 
26  Cl II,JJ)-CI  JJ,II ) 

RETURN 

END 
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Section  I 

Scope  and  Objectives 

1,1  Scope  of  the  Experimental  Investigation. 

The  purpose  of  the  experimental  work  described  in  *he  sequel  was  to  design 
and  develop  piezoelectric  crystal  transducers  for  the  detection  and  recording 
of  stress  waves  in  rocks  and  to  apply  them  to  the  experimental  study  of  wave 
propagation  processes  in  a  model  anisotropic  half-space.  A  large  Yule  marble 
block  served  as  this  model  and  it  wa3  loaded  by  the  normal  impact  of  a  sphere. 

Both  body  wave  and  surface  wave  measurements  were  made  to  study  the  pulse 
propagation  phenomena  in  the  model  which  represented  a  transversely  isotropic 
material  with  its  axis  of  elastic  symmetry  located  in  any  plane  parallel  to  the 
free  surface.  The  experimental  results  were  compared  *ith  both  an  analytical 
u.d  a  numerical  solution,  obtained  from  an  integral  transform  procedure  and  a 
finite  element  method  respectively,  that  yielded  the  arrival  times  and  numerical 
values  of  dynamic  stresses  with  the  aid  of  a  computer.  In  comparing  the  results, 
it  was  assumed  that  (a)  the  block  was  homogeneous  and  elartic  and  (b)  at 
sufficient  distances  from  the  contact  area  of  the  input  crystal,  which  was  sandwiched 
between  the  free  surface  of  the  block  and  a  loading  bar,  the  response  of  the  block 
was  essentially  the  same  as  the  resultant  effect  due  to  a  concentrated  force  of 
arbitrary  time  variation.  However,  the  finite  element  method  could  circumvent 
the  second  hypothesis  as  it  allowed  the  distribution  of  the  input  force  over  the 
contact  area.  The  dynamic  elastic  properties  of  the  material  of  Yule  marble 
were  obtained  experimentally  as  they  needed  to  be  included  in  the  theoretical 
techniques  to  obtain  the  numerical  results. 

he  integral  transform  method  is  the  subject  of  Appendix  A.  The  details  of 
the  finite  element  procedure  are  given  in  a  technical  report^  and  Appendix  B. 

'Tie  methods  initially  employed  and  the  numerical  values  of  the  static  and  dynamic 
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elastic  properties  of  Yule  marble  specimens  so  obtained  are  given  in  Appendix  D 
and  Ref.  (2).  Two  3ets  of  values  of  the  properties  were  obtained,  one  from  samples 
taken  from  one  of  the  two  blocks  utilized  In  the  present  investigation  and  the  other 
from  a  slab  of  Yule  marble  secured  separately  for  this  purpose.  The  slab  and 
the  two  blocks  were  not  secured  from  the  same  source  and  apparently  were  quite 
dissimilar  as  suggested  by  some  significant  differences  in  their  dynamic  elastic 
constants  (Table  4  of  Appendix  D).  Hence  another  set  of  dynamic  elastic  constants 
was  obtained  from  the  wave  arrival  time  measurements  for  the  actual  blocks  based 
on  the  procedure  adopted  in  Ref.  (2^.  The  details  are  gives  in  Section  VII. 

1.2  Objectives  of  the  Experimental  Work. 

The  overall  objectives  of  the  present  investigation  were  the  experimental 
determination  of  the  wave  arrival  times  and  stress  histories  in  the  interior  and 
very  near  the  surface  of  a  block  of  Yule  marble  due  to  normal  impact  of  a  sphere, 
and  the  comparison  of  such  data  with  corresponding  theoretical  predictions.  This 
test  configuration  models  a  transversely  isotropic  elastic  half -space  subjected  to 
a  concentrated  time-dependent  normal  force  on  the  free  surface.  The  task  involved 
the  achievement  of  the  following  subsidiary  objectives: 

(i)  The  design  and  development  of  transducers  using  piezoelectric  crystal 
elements. 

(ii)  The  development  of  an  embedding  technique  which  was  compatible  with 
the  transducer  design. 

(iii)  The  calibration  of  the  transducer  and  the  correlation  with  the  in  situ 
calibration  in  rock  bars. 

(iv)  The  construction  of  a  large  number  of  trmsduce’-s . 

(v)  The  generation  and  measurement  of  the  input  pulse  using  a  crystal 
transducer  sandwiched  between  the  free  surface  of  the  model  half-space 


and  a  loading  bar. 
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(vO  The  drilling  of  long  narrow  holes  in  a  rock  block  and  the  installation 
of  the  transducers  using  a  suitable  bonding  agent. 

VU)  Th<  d'-teeUon  Imd  recording  of  body  waves  and  the  determination  of  arrival 
times  and  stress  histories  In  an  Isotropic  half-space  modeled  by  a 
15"  x  15"  x  ll£"  Bedford  limestone  block. 

'viii)  -The  correlation  of  the  data  obtained  in  the  model  isotropic  half-space 
with  corresponding  theoretical  results,  thus  testing  the  satisfactory 
nature  of  the  embedding  technique. 

(ix)  The  verification  of  the  in  situ  calibration  procedure  by  the  above 
correlation. 

(x)  The  detection  and  recording  of  body  waves  in  on  anisotropic  half-space 
modeled  by  a  Yule  marble  block  and  the  measurement  of  their  arrival 

times  and  stress  histories  at  specific  locations  in  the  interior  of 
the  block. 

(xi)  The  detection  and  recording  of  surface  waves  in  the  anisotropic  half¬ 
space  modeled  by  a  second  Yule  marble  block  and  the  measurement  of  their 

arrival  times  and  stress  histories  at  specific  locations  near  the  surface 
of  the  block. 

The  present  experimental  investigation  was  undertaken  essentially  as  a 
continuation  of  the  previous  surface-wave  study  of  Ref.  (2).  However,  the  use 
f  the  piezoelectric  crystal  transducers  instead  of  the  semi-conductor  strain 
gages  employed  in  Ref.  (2)  considerably  facilitated  the  measurement  techniques. 

Tn  particular,  the  highly  sensitive  PZT  crystals  not  only  allowed  the  delineation 
of  a  normal  transient  stress  component  in  a  specific  direction  at  a  predetermined 
l°ca4 ion  of  the  interior  of  the  rock,  but  also  permitted  the  use  of  a  low  stress 
ieve  input  pulse  on  the  free  surface  of  the  rock.  This  in  turn  enabled  the 
< is  -ement  of  the  input  pulse  by  means  of  an  x-cut  quartz  crystal  sandwiched  between 
f  ‘e  rock  surface  and  a  loading  bar.  The  utilization  of  a  low  stress  level  input 


pulse  prevented  the  occurrence  of  local  damage  at  the  impact  location.  The 
experimentally  determined  input  pulse  was  used  in  the  two  theoretical  techniques 
to  obtain  numerical  results  of  wave  arrival  times  and  stress  histories. 

The  two  blocks  of  Yule  marble  measuring  20”  x  20"  x  10"  were  mined  at 
Yule,  Colorado  and  the  Bedford  limestone  block  was  from  Bedford,  Indiana. 

The  blocks  were  supplied  by  the  U.  S.  Bureau  of  Mines,  Twin  Cities  Mining  Research 
Center,  Minneapolis,  Minnesota.  One  of  the  Yule  marble  blocks,  which  was  previously 
used  for  the  surface  wave  studies^2),  was  employed  for  the  present  body  wave 
measurements  and  the  other  was  utilized  for  the  present  surface  wave  experiments. 

Section  II 

Design,  Development  and  Calibration  of  the 
Piezoelectric  Transducers 

The  different  stages  of  the  deve1opment  of  the  transducer  and  of  a  compatible 
embedding  teennique  ore  described  in  this  section.  The  calibration  procedure  of 
the  transducers  is  also  presented. 

II. 1  Design  and  Development  of  the  Transducer. 

The  purpose  of  the  development  work  was  to  design  a  transducer  which  could 
be  embedded  in  a  rock  model  and  used  to  detect  and  record  a  stress  component  of  a 
pulse  in  a  given  direction  at  a  certain  location  in  the  medium  and  to  develop 
simultaneously  an  embedding  technique  compatible  with  the  transducer  design. 
Initially,  a  number  of  experiments  were  conducted  to  establish  satisfactory 
techniques  of  measurement  of  one -dimensional  pulse  propagation  with  piezoelectric 
x-cut  quartz  crystals  used  in  a  compression  mode.  Later  on,  the  more  sensitive 
PZ7  c^stals  were  employed  for  similar  measurements  before  establishing  a  final 
transducer  design  using  the  FZT  crystals  as  the  transducer  elements.  The  crystal 
axes  for  the  compression  mode  x-cut  quartz  and  PZT  crystals  are  shown  in  Fig.  1 
and  the  corresponding  piezoelectric  constants  are  listed  in  Table  1.  The  equivalent 
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electric  circuit  of  a  piezoelectric  crystal  used  in  the  compression  mode  is 
dor 'ribed  in  Ref.  (3).  Such  a  crystal  may  be  represented  as  a  charge  generator 
and  the  potential  difference  between  its  faces  is  given  by 


V  »  ~ 


(C-l) 


where  q  is  the  charge  generated  and  Ct  is  the  capacitance  of  the  crystal.  If 
the  external  capacitance  of  the  circuit  is  C$  which  includes  the  capacitances 

of  the  connecting  wires,  connectors  and  the  input  capacitance  of  the  connecting 
device,  then 


In  the  case  of  the  x-cut  quartz  crystal  or  a  ceramic  crystal  used  in  the 
longitudinal  compression  mode,  the  piezoelectric  relations  reduce  to 


where  a  is  the  uniformly  distributed  longitudinal  stress,  A  is  the  area  of  the 
crystal,  and  d  is  the  appropriate  piezoelectric  constant.  Kqs.  (2)  and  (3)  may 
be  combined  to  give 
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where  d  =  d^  for  an  x-cut  quartz  crystal  and 

d  =  d33  for  a  piezoelectric  ceramic  crystal,  used  in  the  compression  mode. 
The  crystals  were  utlized  to  record  longitudinal  pulse  propagation  in 
bars  using  the  established  technique  of  a  split  Hopkinson  bar  arrangement^. 

Two  procedures  of  recording  the  output  from  an  x-cut  quartz  crystal,  which  was 
Sandwiched  between  two  aluminum  bars  of  the  same  diameter  as  the  crystal  and 
subjected  to  longitudinal  impact,  were  employed,  namely  a  voltage  amplification 
method  and  a  charge  amplification  method.  Comparison  of  the  data  obtained  from 

the  two  methods  with  the  corresponding  strain  gage  pulse  shape  indicated  that  the 


C-6 


low  frequency  response  with  charge  etmplif ication  was  superior.  In  the  case  of 
PZT  ceramic  crystals,  the  voltage  amplification  method  reproduced  the  longitudinal 
pulse  propagation  with  good  fidelity,  indicating  a  much  better  low  frequency 
reponse  of  the  PZT  crystals  than  that  of  x-cut  quartz  crystals  without  an/ 
additional  shunt  capacitance. 

Preliminary  experiments  with  circular  x-cut  quartz  crystals,  1/8"  dia. 
x  1/32"  thick,  embedded  in  rock  bars  indicated  that  such  crystals  may  be  used 
effectively  for  the  detection  of  longitudinal  pulse  propagation^.  Initial 
experiments  were  performed  in  rock  bars  of  about  3/4"  in  diameter  subjected  to 
central  longitudinal  impact  with  a  crystal  completely  embedded  at  one  section 
of  the  bar.  This  involved  the  attachment  of  lead  wires  to  the  crystals  using 
Electrobond  H2 016  adhesive  manufactured  by  Adhesive  Engineering  Company.  A  bar 
about  18"  long  was  cut  into  two  and  a  hole  3/16"  in  diameter  and  3/16"  deep  was 
drilled  on  one  end  of  one  of  the  segments  in  the  center.  A  diamet  al  groove 
was  sliced  across  the  hole  to  accommodate  the  lead  wires;  the  hole  was  then 
filled  with  a  mixture  of  epoxy  and  rock  powder  and  the  crystal  was  embedded  in 
this  composite.  The  other  segment  was  then  bonded  to  the  firjt  to  produce  a 
single  test  specimen  with  on  internal  transducer. 

Strain  gages  were  mounted  on  the  opposite  ends  of  a  bar  diameter  at  a  potition 
about  3"  from  the  crystal  position.  These  gages  were  incorporated  in  a  potentio- 
metric  circuit  and  were  coupled  in  series  to  eliminate  any  antisymmetric  components 
of  the  transients  from  the  records.  A  diameter  steel  ball  was  dropped  from  a 
height  of  feet  onto  the  end  face  of  the  vertically  held  bar  and  the  resulting 
pulse  was  detected  by  both  the  strain  gage  and  the  crystal  and  recorded  on  an 
oscilloscope.  A  comparison  of  the  crystal  response  with  the  corresponding  signal 
from  the  surface  strain  gages  showed  a  distortion  in  the  former.  A  second  experiment 
with  an  x-cut  quartz  crystal  totally  embedded  in  another  bar  indicated  that  even 
though  such  crystals  effectively  detect  the  stress  pulse  propagation,  the  crystal 
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signal  consistently  showed  similar  distortion.  This  was  successfully  eliminated 
by  the  removal  of  the  lateral  constraint  on  the  crystal  by  surrounding  the  crystal 
Ki+h  a  rubber  ring!  ^In  consequence,  it  wan  concluded  that  the  coupling  between 
thG  *olerization  in  the  x-direction,  which  coincided  with  the  longitudinal  direction 
of  +he  bar,  and  the  stress  on  the  lateral  side  of  the  crystal  influenced  the 
response  of  a  totally  embedded  crystal. 

This  effect  was  confirmed  when  two  identical  x-cut  quartz  crystals  were 
embedded  in  the  same  rock  bar.  One  crystal  was  totally  embedded  and  the  other 
was  laterally  unconstrained  by  surrounding  the  crystal  with  an  annular  rubber 
ring.  The  response  of  the  former  again  exhibited  a  distortion  in  the  recorded 
I  -xse  shape  as  compared  to  the  corresponding  response  of  the  latter  and  the 
signal  from  the  strain  gages.  The  totally  embedded  crystal  also  recorded  a 
lower  amplitude.  Therefore,  to  measure  a  truly  one-dimensional  stress,  a 
t.ajisducer  which  could  be  embedded  in  a  rock  bar  and  yet  would  retain  the  freedom 
of  the  crystal  element  from  lateral  conatraint  had  to  be  devised. 

In  oroer  to  achieve  such  a  design,  it  was  deemed  necessary  to  mount  the 
crystal  In  a  housing  which  would  prevent  any  bonding  material  uaed  in  the  embedment 
process  from  surrounding  the  crystal  itself.  In  principle,  the  housing  consisted 
of  two  metal  end  pieces  separated  by  a  glass  washer,  of  the  bum  thickness  as  the 
’-va+al,  with  the  crystal  encased  in  the  arrangement.  Th*  freedom  of  the  crystal 
from  lateral  constraint  was  achieved  by  maintaining  a  small  air  gap,  about  0.002" 
wide,  between  the  outside  diameter  of  the  circular  crystal  and  the  inside  diameter 
of  the  glass  washer.  Lead  wires  attached  to  the  metal  end  pieces  completed  the 
transducer  assembly.  The  calibration  of  such  a  transducer  using  a  circular  x-cut 
quartz  crystal,  l/8"  dia.  x  l/32"  thick,  as  the  transducer  element  was  successfully 
accomplished  by  the  split  Hopkinson  bar  technique^.  However,  an  alternative 
embedding  procedure  to  the  one  originally  envisaged  prevailed,  requiring  a  simple 
redesign  of  the  transducer  as  explained  below. 


c-8 


In  the  development  of  a  suitable  embedding  technique,  the  preliminary 
experiments  were  conducted  with  rock  bars  cored  from  a  slab  of  Yule  marble. 

The  following  alternatives  were  considered:  (a)  The  lead  wire  arrangement  of 
the  transducer  assembly  described  above  was  modified^  to  permit  ready  insertion 
in  a  relatively  deep  cored  hole  of  the  same  diameter  as  the  transducer  in  a  rock 
bar.  A  3"  deep  hole  was  core-drilled  coaxially  in  a  9”  long  bar  and  the  trans¬ 
ducer  >ras  inserted  and  anchored  at  the  base  of  the  hole  using  a  mixture  of  rock 
powder  and  epoxy  as  the  bonding  agent.  The  hole  was  then  filled  with  the  same 
mixture  of  rock  powder  and  epoxy  after  extracting  the  wire  leads  out  of  the 
hole,  (b)  The  same  procedure  as  described  in  (a)  was  followed  except  that  the 
filler  material  used  was  a  mixture  of  aluminum  oxide  and  epoxy.  Based  on  the  fact 
that  Yule  marble  has  an  acoustic  impedance  higher  than  that  of  epoxy  and  lower 
than  that  of  aluminum  oxide  (Table  2),  it  was  thought  that  such  a  mixture 
in  appropriate  proportions  would  provide  a  better  impedance  match  with  the 
Yule  marble  than  the  mixture  of  rock  powder  and  epoxy,  (c)  A  metal  bar,  whose 
acoustic  impedance  matched  that  of  Yule  marble  with  the  crystal  assembly  mounted 
on  one  end  was  considered  since  such  a  bar  could  be  inserted  easily  into  a  deep 
hole.  Since  magnesium  ha3  an  acoustic  impedance  closely  matching  the  average 
acoustic  impedance  of  the  Yule  marble  material  (Table  2),  a  transducer  assembly 
was  constructed  using  a  3/l6"  diameter  bar  of  magnesium  as  shown  in  Fig.  2. 
Experiments  with  rock  bars  and  a  sandstone  block  indicated  that  the  embedding  of 
the  transducers  would  be  considerably  facilitated  with  such  a  design.  Hence  a 
final  transducer  design  in  the  form  of  a  magnesium  bar  with  the  crystal  element 
attached  at  one  end  was  adopted.  The  crystal  was  again  encased  in  a  glass  washer 
and  a  metal  end  piece  arrangement.  A  lead  wire  was  attached  to  the  metal  end 
piece  and  extracted  out  through  a  groove  machined  along  the  length  of  the  bar 
and  a  second  lead  wire  was  attached  direc  iy  to  the  bar  (Fig.  2), 
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rh°l  <*  o£  the  Fiozop^e^tr4 c  Crystal  Element. 

An  examination  of  the  piezoelectric  constants  of  quartz  and  ceramic  crystals, 
shown  in  Table  1  indicates  that  when  these  crystals  are  used  in  a  compression  mode 
a  truly  one -dimensional  stress  measurement  is  obtained.  Now  if  such  a  crystal 
were  to  be  embedded  within  a  rock  median,  it  would  be  subjected  to  a  complex  stress 
field  in  any  general  three-dimensional  stress  wave  propagation  situation.  It  is 
then  not  possible  to  delineate  the  stresses  at  a  location  of  the  medium  completely 
with  one  compression  mode  crystal.  However,  if  the  crystal  properly  measured  the 
stress  in  one  direction  it  would  give  useful  information  concerning  such  a 
component  at  this  position.  In  some  cases,  such  as  for  an  axisymmetric  state  of 
stress,  several  crystals  may  be  suitably  located  to  take  advantage  of  this  symmetry 
so  that  more  information  may  be  obtained  regarding  the  state  of  stress  for  a  given 
pulse  at  a  point  in  the  medium  without  repeating  the  test. 

To  obtain  the  stress  along  the  axis  of  an  embedded  compression  mode 
crystal,  the  following  conditions  must  be  met:  (i)  The  crystal  must  be  free  from 
ary  lateral  stress;  (ii)  The  charge  generated  across  the  crystal  must  be  dependent 
only  on  the  normal  stress  on  the  crystal,  i.e.,  there  cannot  be  any  coupling 
between  the  face  shear  stress  which  is  the  shear  component  of  the  stress  vector 
a  f in®  on  the  crystal  face  and  the  polarization  in  the  compression  mode;  and 
(iii)  The  crystal  must  be  embedded  in  a  manner  so  that  it  responds  to  both  com¬ 
pression  and  tension. 

The  first  condition  was  met  by  the  design  of  the  transducer.  In  the  case  of 
x-cut  quartz  crystals,  the  cross  coupling  between  the  face  shear  and  the  polarization 
in  the  x-direction  is  revealed  by  the  non-zero  piezoelectric  stress  constant  d 

14’ 

which  is  one  of  the  two  independent  constants  relating  the  electric  charge  to  the 
sress  tensor  in  this  type  of  crystal  material(5).  In  general,  the  electric  charge 
density  or  polarization  and  the  stress  are  related  by^5\ 
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^1  = 

where  the  subscript  i  takes  the  values  1,2,3  and  the  subfcript  j  takes  the 
values  of  1,2,...,C.  With  reference  to  Fig.  1,  the  x,y,z  axes  correspond  to 
the  subscripts  1,2,3  and  the  yz,  xz  and  xy  planes  correspond  to  the  subscripts 
4,5,6  respectively.  Thus  the  polarization  in  the  x-direction  or  1-direction  for 
an  x-cut  quartz  crystal  is  given  by 

%  -  du0l  *  d12o2  *  dllt<Jlt 

where  d^2  *  -d^  and  the  other  constants  vanish  (Table  l).  The  effect  of  the 
second  tern  was  eliminated  by  the  design  of  the  transducer  based  on  the  assumption 
that  there  were  no  end  effects  due  to  the  encasement  of  the  crystal  between  the 
metal  end  piece  and  the  bar.  However,  the  non-zero  constant  dll+,  precludes  the 
use  of  x-cut  quartz  crystals  for  a  truly  uniaxial  stress  measurement  in  a 
complex  stress  field.  Nov*  for  ceramic  crystals,  the  compression  mode  direction 
is  the  z-direction.  Again  referring  to  Fig.  1,  the  polarization  in  the  z-direction 
or  3-direction  for  a  ceramic  crystal  in  the  compression  mode  is  given  by 

S  *  Vl  +  d32c2  *  d33°3 

where  d^  «  d^,  and  the  other  constants  vanish  (Table  2).  The  effect  of  the 
first  two  terms  is  eliminated  by  the  design  of  the  transducer  and  hence  the 
second  condition  cited  above  was  met  by  the  choice  of  PZT  ceramic  crystals  as 
the  transducer  elements.  The  construction  of  the  transducer  and  embedment  with 
a  strong  bonding  agent  ensured  that  the  crystal  would  respond  to  both  compression 
and  tension. 

Three  types  of  ceramic  crystals  were  used  as  the  transducer  elements,  namely 
PZT-4,  PZT-5a  and  PZT-5H.  Table  1  lists  the  various  crystals  used  in  the  course 
of  the  ^resent  investigation  including  their  properties,  dimensions,  the  name  and 

address  of  the  supplier  and  where  they  were  utilized. 
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II. 3  Construction  and  Assembly  of  the  Transducers. 

The  initial  development  work  was  performed  with  PZT-5a  crystals,  1/8"  dia. 
x  l/32"  thick.  A  number  of  3/l6"  dia.  transducers  were  constructed  to  the  design 
shown  in  Fig.  1.  Similar  transducers  utilizing  circular  PZT-5H  crystals,  1/8”  dia. 
x  l/32"  thick,  were  also  fabricated.  In  the  eventual  measurements  on  the  Yule 
marble  blocks,  PZT-4  crystals,  l/l6"  dia.  x  0.020"  thick,  were  used  and  the  transducer 
diameter  was  l/8"  (Fig.  3)  but  the  design  was  essentially  the  same  as  for  the 
3/l6"  dia.  transducer. 

A  special  procedure  was  devised  to  mount  a  large  number  of  transducers 
conveniently,  which  enabl  precision  assembly.  However,  uniformity  in  assembly 
could  not  be  achieved  due  to  a  number  of  factors  such  as  the  thickness  of  the 
epoxy  adhesives,  small  variations  in  the  thickness  of  the  crystals  and  viriations 

in  the  thickness  of  the  glass  washers.  Hence  the  transducers  had  to  be  calibrated 
individually. 

11,11  Development  of  a  Split  Hopkinson  Bar  Arrangement  for  Calibration. 

In  order  to  utilize  the  crystal  transducers  for  internal  dynamic  stress 
measurements,  a  suitable  calibration  procedure  had  to  be  devised.  Initial 
calibration  attempts  with  an  earlier  design  of  the  transducer,  using  an  x-cut 
quartz  crystal  as  the  transducer  element  were  quite  successful^ .  The  split 
Hopkinson  bar  technique  used  in  these  experiments  indicated  that  a  piezoelectric 
constant  could  be  established  for  the  transducer  assembly  as  opposed  to  the 
corresponding  constant  of  the  crystal  itself  (Fig, 4).  A  comparison  of  the  signals  from 
the  surface  strain  gages,  located  both  before  and  after  the  transducer,  with  the 
crystal  response  showed  that  (i)  it  was  possible  to  detect  and  record  longitudinal 
pulse  propagation  using  the  crystal  transducer  with  good  fidelity  based  on  signals 
frtm  the  strain  gages;  (ii)  Neither  the  transducer  nor  the  epoxy  joints  between 
the  transducer  and  the  aluminum  split  Hopkinson  bars  caused  any  significant 


reflections  of  the  pulse  at  the  transducer  station,  as  is  indicated  by  the 
identical  signals  obtained  from  both  the  strain  gage  stations,  and  (iii)  The 
small  air  gap  of  about  0.002"  between  the  crystal  and  the  surrounding  glass 
washer  did  not  cause  reflections  of  the  pulse.  In  view  of  the  small  thickness 
of  the  crystal,  namely  l/32",  compared  to  the  length  of  the  pulse  employed  in 
these  experiments  (about  8  in.),  these  results  confirmed  the  hypothesis  that  the 
introduction  of  such  a  discontinuity  would  not  interrupt  the  wave  propagation 
process^.  This  conclusion  was  also  significant  in  relation  to  the  subsequent 
use  of  the  transducers  for  internal  measurements. 

The  technique  of  calibrating  the  transducer  by  comparing  its  response  with 
a  corresponding  strain  gage  signal  was  also  used  for  the  final  transducer  design. 

The  transducer  in  the  form  of  a  magnesium  bar  with  the  crystal  assembly  at  one 
end  made  up  one-half  of  the  split  Hopkinson  bar  arrangement  (Fig.  5)  •  The  second 
half  consisted  of  another  magnesium  bar  of  the  same  diameter.  The  two  bars 
were  attached  together  with  an  epoxy  adhesive.  Initial  experiments  were  again 
successful  in  the  sense  that  the  correspondence  between  the  crystal  response  and 
signal  from  the  strain  gages  was  very  good  and  a  piezoelectric  constant  could  be 
established  for  the  transducer  assembly.  However,  since  the  crystal  housing 
was  in  the  middle  of  the  split  Hopkinson  bar  arrangement,  the  transducer  could 
not  be  disengaged  from  the  second  half  of  the  composite  bar  without  breaking  the 
rather  fragile  glass  washer  and  end-piece  assembly.  Hence. the  bars  were  repositioned 
as  shown  in  Fig.  6  to  allow  a  simple  removal  of  the  transducer  after  calibration. 

By  breaking  the  epoxy  joint  between  the  free  end  of  the  transducer  bar  and  the 
second  half  of  the  split  Hopkinson  bar,  the  transducer  could  be  disengaged  easily. 

Two  more  magnesium  bars  were  utilized,  one  in  front  of  the  transducer  and  the 
other  at  the  far  end  of  the  arrangement  and  were  held  firmly  against  their 
respective  contact  faces  with  a  thin  layer  of  wax.  The  purpose  of  the  former  was 


served  as  a  momentum 


to  avoid  striking  the  crystal  assembly  directly  and  the  latter 
trap  to  prevent  the  tension  pulse  reflected  from  the  far  end  from  damaging  the 
crystal  assembly  unit.  The  same  physical  arrangement  was  used  for  calibrating 
both  the  3/l6  dia,  and  1/8"  dia.  transducers. 

External  Calibration  of  the  Transducers. 

The  external  calibration  procedure  for  the  transducers  described  in  this 
section  holds  for  both  the  3/16"  dia.  and  the  1/8"  dia.  transducers.  For 

illustrating  the  procedure,  a  3/l6"  dia.  transducer  using  a  PZT-5H  crystal 
is  chosen. 

The  experimental  arrangement  for  the  calibration  of  the  transducers  is  shown 
in  Fig.  6.  The  four  bars  are  designated  as  the  loading  bar,  the  transducer  bar, 
the  strain  gage  bar  and  the  momentum  trap.  The  construction  of  the  transducer 
ensured  that  the  ends  were  smooth  and  square.  The  end  faces  of  the  other  bars 
were  previously  machined  for  good  contact  at  the  joints.  The  transducer  bar  was 
placed  in  position  and  its  free  end  was  attached  to  the  strain  gage  bar  with 
Scotch-Weld  1838  B/A  structural  epoxy  adhesive  manufactured  by  3M  Company,  St.  Paul, 
Minn..  The  epoxy  adhesive  was  allowed  to  cure.  To  accelerate  the  curing  process, 
heat  was  applied  with  a  blow  lamp;  a  temperature  of  about  150°F  was  attained  and 
the  epoxy  hardened  in  about  1  hour.  The  other  bars  were  assembled  as  shown  in 
Fig.  6. 

Since  previous  experiments  indicated  that  there  would  be  no  reflection  of  a 
relatively  long  pulse  at  the  epoxy  joint,  only  one  strain  gage  station  was 
employed  for  comparison  with  the  crystal  response.  This  strain  gage  station, 
about  4"  from  the  epoxy  joint,  consisted  of  a  pair  of  SR-4  strain  gages  type 
FAE-12-12S9L  manufactured  by  BLH  Electronics,  Inc,,  Mass,  bonded  with  EPY-I50 
cement.  The  strain  gages,  each  exhibiting  a  gage  factor  of  2.03  +  1$  and  a 
resistance  of  120  ohms  +  0.2$,  were  incorporated  in  a  potentiometer  circuit 


and  were  coupled  in  series  to  eliminate  the  antisymnetric  components  of  a  pulse.  The 
total  capacitance  of  the  crystal  circuit  was  measured  by  means  of  an  Impedance 
Bridge  type  I65O-A  manufactured  by  General  Radio  Company. 

The  crystal  response  was  measured  by  the  voltage  amplification  method.  The 
PZT  crystals  employed  in  the  transducers  were  highly  sensitive,  capable  of 
producing  voltages  in  excess  of  the  maximum  that  could  be  recorded  on  the  oscillo¬ 
scope,  thus  requiring  the  use  of  a  100X  attenuator  before  the  output  from  the 
crystal  could  be  so  recorded.  For  example.,  the  d^  constant  of  FZT-5H  crystals 
from  Table  1  is  2638  pc/Lb  while  the  d^  constant  for  x-cut  quartz  crystals  is 
10.2  pc/Lb.  Hence,  in  comparison  with  the  voltages  of  about  2.0  V  obtained 
with  x-cut  quartz  crystals  in  the  experiments  wi\,h  the  earlier  design  of  the 
transducer,  voltages  of  the  order  of  400  V  may  be  expected  with  the  PZT  crystal 
transducers.  However,  even  lower  impact  velocities  of  about  20-30  ft. /sec.  were 
actually  sufficient  to  obtain  the  necessary  comparison  with  the  corresponding 
pulse  from  the  strain  gage  station.  A  Tektronix  type  565  dual  beam  oscilloscope 
was  employed  to  record  both  the  strain  gage  signal  and  the  crystal  output  on  the 
same  oscillogram.  The  channel  measuring  the  crystal  response  with  a  band  width 
of  dc  to  300  kc.  was  carefully  calibrated  using  the  amplitude  calibrator. 

The  pulse  was  Initiated  by  shooting  a  3/l6"  diameter  steel  ball  from  an  air 
gun  longitudinally  and  centrally  against  the  impact  end  of  the  loading  bar.  The 
oscilloscope  was  triggered  using  the  amplified  output  from  another  crystal  attached 
firmly  to  the  side  of  the  loading  bar  with  some  adhesive  tape  and  the  various 
pulse  shapes  were  then  recorded  photographically.  The  strain  gages  were  calibrated 
by  the  dynamic  shunting  of  external  resistances  into  the  potentiometer  circuit 
and  recording  the  corresponding  deflections  of  the  trace^.  With  the  aid  of  a 
simple  experiment  involving  longitudinal  pulse  propagation  in  a  3/l6"  diameter 
magnesium  bar,  the  dynamic  modulus  of  magnesium  was  determined.  A  value  of 


C-15 


6.3?  x  106  psi  was  obtained  which  compared  well  with  the  static  modulus  of 
6.5  x  10^  psi^. 

Wi+h  the  aid  of  Eq.  (C-U) ,  the  measured  total  capacitance  of  the  transducer 
circuit  including  the  input  capacitance  of  the  attenuator,  the  area  of  the  trans¬ 
ducer  face  (not  the  area  of  the  crystal  face),  the  peak  voltage  output  from  the 
crystal  and  the  peak  stress,  the  piezoelectric  constant  for  the  transducer  was 
evaluated.  This  gave  an  equivalent  constant  for  the  transducer  as  explained  in 
Fig.  4.  This  constant  obtained  by  such  an  external  calibration  was  designated 
by  the  symbol  K. 

II. 6  In  Sjtu  Oallbration. 

Body  wave  measurements  in  a  limestone  block^,  indicated  that  the  external 
calibration  frocedure  alone  was  insufficient  to  obtain  stresses  from  internal 
measurements.  Such  a  conclusion  was  reached  after  embedded  measurements  in  the 
limestone  block  using  wax  as  the  bonding  agent  did  not  correlate  with  the 
'•orrespondxng  results  obtained  by  the  finite  element  method.  The  measurements 
apparently  failed  to  give  satisfactory  results  because: 

(i)  The  transducers  were  not  calibrated  individually.  It  was  originally 
assumed  on  the  basis  of  calibrating  two  transducers  externally  that 
the  external  calibration  constant  would  be  nearly  the  same  for  all 
transducers  using  the  same  type  of  crystal  element.  However,  it  was 
later  found  that  the  external  calibration  constants  depended  on  the 
tolerance  of  the  individual  elements  making  up  the  crystal  units  and 
varied  considerably  from  one  transducer  to  another; 

(ii)  The  wax  used  as  the  bonding  agent  proved  ineffective  for  transmitting 
tensile  stresses,  and; 

(±ii)  A  calibration  procedure  was  not  established  to  correlate  the  external 
calibration  constant  with  an  in  situ  calibration. 


c-i6 


Hence  additional  experiments  were  performed  to  devise  a  suitable  method 
for  in  situ  calibration  In  rock  bars.  Tests  on  limestone  rock  bars  with  embedded 
transducers  using  wax  as  the  bonding  agent  again  Indicated  an  inconsistency  between 
the  transducer  response  and  the  surface  strain  gage  signal.  The  transducer  output 
varied  depending  upon  the  contact  inside  the  hole  between  the  transducer  face  and 
the  material  of  the  rock.  Since  an  epoxy  type  of  Joint  had  proven  to  be  effective 
In  a  number  of  earlier  applications,  such  as  the  external  calibration  of  the 
transducer,  a  mixture  of  aluminum  oxide  and  epoxy  was  considered  a  more  suitable 
bonding  agent  between  the  transducer  and  the  rock  material.  Similar  experiments 
with  limestone  rock  bars  with  embedded  transducers  and  surface  strain  gages 
showed  that  the  correspondence  between  the  embedded  crystal  response  and  the 
signal  from  the  strain  gages  was  more  consistent  when  a  mixture  of  aluminum  oxide 
and  epoxy  was  used  as  the  bonding  agent. 

II. 7  Correlation  of  the  External  Calibration  with  In  Situ  Calibration 
In  Rock  Bars. 

A  limestone  bar  with  a  diameter  of  about  3/4"  and  a  length  of  15"  was  chosen 

for  the  in  situ  calibration  because  the  dynamic  mismatch  between  limestone  and 

\ 

magnesium  was  found  to  be  less  than  a*  shown  In  Table  1.  An  experiment  was 
executed  to  measure  the  longitudinal  stress  pulse  propagation  In  the  bar  using  a 
transducer  In  the  embedded  state.  A  comparison  of  the  transducer  response  with 
surface  strain  gages  was  expected  to  give  an  in  situ  calibration  constant  for  the 
transducer,  say  K^.  The  objective  was  to  correlate  this  constant  with  that  obtained 
by  external  calibration. 

A  3/l6"  diameter  transducer  10"  long  (Fig.  2)  was  constructed  using  a  l/8"  dia. 
x  1/32"  thick  PZT-5a  crystal.  A  3/l6"  diameter  hole  about  8”  deep  from  one  end  was 
core-drilled  coaxially  In  the  limestone  bar.  The  drilling  was  performed  with  a 
diamond  drill  supplied  by  Keen  Kut  Products,  Burlingame ,  California.  The  trans¬ 
ducer  was  calibrated  externally  and  the  constant  K  was  established.  The  transducer 
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was  then  inserted  in  the  hole,  using  a  mixture  of  epoxy  adhesive  and  aluminum 
oxide  as  the  bonding  agent,  thus  securely  anchoring  the  crystal  assembly  end  of 
the  transducer  at  the  bottom  of  the  hole.  A  pair  of  SR-U  semiconductor  strain 
gages  were  mounted  at  the  same  section  of  the  rock  bar  as  the  crystal  station. 

The  strain  gages  were  of  the  type  SPB  3-12-12  manufactured  by  BLH  Electronics 
Inc.,  Mass,  and  EPY-150  epoxy  cement  was  used  for  bonding  the  gages  to  the  rock 
bar.  The  gages  were  mounted  on  the  opposite  ends  of  a  diameter  of  the  bar  and 
coupled  in  series  to  eliminate  antisymmetric  effects  and  incorporated  in  a 
potentiometer  circuit.  The  experimental  arrangement  is  shown  in  Elg.  7.  a 
thin  layer  of  Electrobond  #2016  conducting  epoxy  adhesive  manufactured  by 
Adhesive  Engineering  Company  was  applied  to  the  impact  end  and  a  lead  wire 
was  taken  off  the  epoxy.  The  epoxy  layer  was  polished  to  a  smooth  surface. 

The  surface  was  then  smeared  with  some  conducting  epoxy  without  the  hardener. 

The  rock  bar  was  subjected  to  central  longitudinal  impact  through  an  l/8" 
diameter  aluminum  loading  bar  with  l/8"  dia.  x  l/32"  thick  x-cut  quartz  crystal 
sandwiched  between  the  loading  bar  and  the  rock  bar.  Again,  a  thin  layer  o^ 
conducting  epoxy  without  the  hardener  was  applied  to  the  contact  faces  of  the 
crystal  and  the  loading  bar.  A  second  lead  wire  was  attached  to  the  loading 
bir  close  to  the  crystal.  This  crystal  station  was  utilized  to  measure  the  input 
pulse  with  the  aid  of  a  charge  amplifier.  The  pulse  was  generated  by  shooting  the 
impact  end  of  the  loading  bar  with  a  3/l6"  dia.  steel  ball  from  in  air  gun  at  a 
velocity  of  about  20  ft/sec.  The  input  pulse  and  the  signal  from  the  calibrated 
strain  gages  were  recorded  on  a  dual-beam  oscilloscope  and  the  embedded  crystal 
response  was  recorded  on  another  oscilloscope. 

The  input  pulse  measurement  obtained  by  charge  amplification  was  effectively 
a  force-time  record.  A  comparison  of  the  input  pulse  and  the  strain-time  record, 
usir  3  the  area  of  the  cross  section  of  the  limestone  bar  and  a  value  of  5.0  x  10^  psi 
1  r  he  dynamic  elastic  modulus  of  limestone,  showed  good  correspondence.  This 
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indicated  that  the  input  measurement  by  means  of  an  x-cut  quartz  crystal  loaded 
through  a  loading  bar  was  correct. 

The  experiment  was  repeated  using  voltage  amplification  for  the  measurement 
of  the  input  pulse  and  similar  agreement  as  above  between  the  strain  pulse  and  the 
force-time  record  proved  that  either  method  of  input  measurement  was  reliable. 

The  capacitance  of  the  transducer  circuit  was  measured  and  the  input  capacitance 
of  the  oscilloscope  was  added  to  give  the  total  capacitance  of  the  circuit.  With 
the  aid  of  Eq.  (C-U)  the  stress-time  record  was  established  from  the  transducer 
response  for  both  experiments.  A  comparison  of  the  peak  stress  from  the  stress - 
time  record  and  the  peak  strain  from  the  surface  strain  gage  data  using  the  same 
value  of  the  dynamic  elastic  modulus  of  limestone  enabled  the  establishment  of 
an  in  situ  calibration  constant  for  the  transducer.  It  was  found  that  this 
constant  was  related  to  the  external  calibration  constant  K  by 
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where  a  is  the  area  of  the  crystal  face  and  A  is  the  area  of  the  transducer  face. 
Similar  experiments  involving  a  second  limestone  bar  with  an  embedded  transducer 
which  was  previously  calibrated  externally  and  surface  strain  gages  yielded  the 
same  correlation. 

Since  it  was  obviously  not  practical  to  establish  a  correlation  between  the 
external  calibration  constant  and  the  in  situ  calibration  constant  for  each 
transducer,  the  above  correlation  was  accepted  to  hold  for  all  transducers.  Thus, 
each  transducer  was  calibrated  externally  and  individual  constants,  K,  were 
established  and  subsequent  internal  measurements  were  expected  to  yield  values 
for  stresses  using  this  constant  K  and  the  above  correlation. 
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Section  III 

Body  Wave  Propagation  In  An 
Isotropic  Rock  Model 

III.l  *  Introduction. 

The  method  of  the  measurement  of  body  wave  propagation  in  a  model  isotropic 
half-space,  represented  by  a  Bedford  limestone  block,  15"  x  15"  x  ll£" ,  generated 
by  sphere  impact  perpendicular  to  the  free  surface  is  described  in  this  section. 

These  experiments  were  preceded  by  body  wave  measurements  with  the  same  block 
as  described  in  Ref.  (8).  The  earlier  experiments  failed  to  give  satisfactory 
results  for  the  reasons  given  in  II. 6  and  the  lack  of  agreement  between  the 
experimental  results  and  the  theoretical  predictions  prompted  a  reappraisal  of 
the  calibration  procedure  and  the  bonding  technique  (cf.  II. 6  and  II. 7).  The 
main  purpose  of  the  experiments  described  in  this  section  was  to  test  the  validity 
of  the  correlation  between  the  external  calibration  and  the  in  situ  calibration 
in  rock  bars  established  in  Section  II  and  to  confirm  the  satisfactory  nature  of 
the  bonding  technique.  In  order  to  meet  these  objectives  it  was  necessary: 

(i)  To  establish  the  necessary  technique  for  drilling  long  holes  of  small 
diameter,  with  diamond  core  drills,  in  a  block  of  rock  material. 

(ii)  To  install  externally  calibrated  transducers  in  the  holes  using  a 
suitable  bonding  agent. 

(iii)  To  devise  a  method  of  generation  and  measurement  of  the  input  pulse 
using  a  spherical  steel  ball  as  the  striker. 

(iv)  To  detect  and  record  body  wave  propagation  and  obtain  arrival  times. 

(v)  To  obtain  stress  histories  in  particular  directions  at  certain  locations 

in  the  rock  medium  by  using  the  correlation  between  the  in  situ  calibration 
and  the  external  calibration  established  in  Section  II, 
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(vi)  To  compare  the  experimentally  obtained  stress-time  records  with  the 
corresponding  theoretical  results  obtained  by  the  integral  transform 
analysis  and  the  finite  element  method  and  hence  to  verify  the  cali¬ 
bration  procedure. 

(vii)  To  confirm  the  satisfactory  nature  of  the  embedding  technique,  and 
finally; 

(viii)  To  establish  the  experimental  techniques  that  would  be  used  later  for 
the  study  of  the  wave  propagation  processes  in  the  model  anisotropic 
half -space. 

III. 2  Installation  of  the  Transducers. 

The  limestone  block  was  drilled  using  a  3/l6"  dia.  x  10"  long  core  drill 
on  a  press  especially  adapted  to  provide  a  continuous  supply  of  water.  The 
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transducers  previously  embedded  with  wax'  '  were  removed.  In  the  process  of 
removal,  the  crystal  assembly  ends  of  two  of  the  transducers  broke  off  inside 
their  respective  holes.  These  ends  were  removed  by  drilling  them  out  with  an 
extended  3/l6"  dia.  flat  bottomed  fluted  drill  driven  by  a  hand-operated  power 
drill.  The  deep  holes  were  cleaned  by  pouring  acetone  down  the  holes  and 
inserting  the  long  fluted  drill  inside  the  holes  and  rotating  by  ihaild  until  there 
was  no  trace  of  metal  filings  or  wet  rock  powder  in  the  flutes  when  the  drill  was 
removed . 

A  total  of  four  transducers  with  3/16"  dia.  magnesium  bars  utilizing  circular 
PZT-5  crystals  were  constructed  (Fig.  2);  two  of  the  transducers  utilized  PZT-5a 
crystals  and  two  featured  PZT-5H  crystals  as  the  transducer  elements.  Each 
transducer  was  about  10"  long  and  was  externally  calibrated  with  constants  given 
in  Table  3.  The  transducers  were  cleaned  with  acetone  to  remove  any  traces  of 
grease  from  previous  machining  operations.  The  hole  depths  in  the  rock  were 
carefully  measured  and  the  corresponding  lengths  were  marked  on  the  transducers. 


A  mixture  of  aluminum  oxide  and  epoxy  was  prepared  heated  with  a  blow  lamp  to 
make  it  flow  more  easily,  and  smeared  on  the  transducers.  A  liberal  coating 
was  applied  so  that  the  crystal  assembly  end  of  the  transducer  had  a  l/l6" 
thick  layer  of  the  bonding  agent  around  it.  The  transducers  were  then  installed 
in  their  respective  positions.  The  secure  anchoring  of  the  crystal  assembly 
ends  at  the  bottom  of  the  holes  was  insured  by  observing  that  the  previously 
provided  markers  on  the  transducer  bars  maintained  a  certain  predetermined  distance 
from  the  rbck  surface.  The  transducers  were  lightly  pushed  into  position.  Heat 
was  applied  to  the  rock  by  means  of  a  blow  lamp.  A  temperature  of  about  150°F 
was  attained  on  the  rock  surface.  The  bonding  agent  was  allowed  to  cure  for 
about  one  day.  Low  noise  cables,  each  about  3'-0"  long  with  BNC  connectors  at 
their  ends  were  attached  to  the  transducer  leads.  The  transducer  locations  are 
indicated  in  Fig.  8.  During  the  calibration  of  the  transducers,  the  polarity 
of  each  transducer  was  also  determined. 


Generation  and  Measurement  of  Input  Pulse. 

A  stress  pulse  of  low  magnxtude  such  as  one  generated  b >  tapping  the 
free  surface  of  the  block  was  sufficient  to  detect  pulse  propagation  with  the 
embedded  transducers.  Such  a  pulse  was  recorded  by  connecting  one  of  the  transducers 
to  a  type  5**9,  Tektronix  storage  oscilloscope  and  triggering  the  scope  internally. 

All  the  embedded  transducers  were  tested  this  way  to  make  sure  they  were  functioning 
properly.  It  was  clear  that  a  sufficiently  strong  impact  could  be  achieved  by 
shooting  a  3/l6"  dia.  steel  ball  with  an  air  gun  at  a  low  velocity  but  it  was 
restricted  to  such  a  stress  level  that  the  impact  through  a  1/8"  diameter  loading 
bar,  as  described  in  II. 7,  on  a  1/8"  dia.  x-cut  sandwiched  quartz  crystal,  Fig.  9, 
did  not  break  the  sensor.  The  input  was  measured  by  means  of  charge  amplification 
using  a  Kistler  s/N  U77  unit.  A  charge  sensitivity  of  10.2  x  10" 12  coulombs/lb 
was  used;  this  was  the  value  obtained  in  the  course  of  the  present  investigation 
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as  described  In  Ref.  (4).  The  oscilloscope,  were  triggered  by  neons  of  the  amplify 

output  of  another  crystal  attached  to  the  loading  bar  about  4"  ahead  of  the  Input 
crystal. 

III^  Measurement  of  Body  Wave  Propagation. 

The  experimental  arrangement  employed  Is  shorn  In  Fig.  9.  The  limestone 
block  vas  set  up  on  a  table  which  could  be  adjusted  In  three  mutually  perpendicular 
directions  by  means  of  cross  slides,  each  provided  with  a  screwed  spindle  and  a 
handle.  The  block  was  aligned  with  the  aid  of  a  precision  level  and  a  triangle 
so  that  the  loading  bar  was  perpendicular  to  the  free  surface.  The  capacitances 
of  the  transducers  and  the  respective  cables  and  connectors  were  measured  by  means 
of  the  Impedance  bridge  cited  In  II. 5.  The  total  capacitance  of  each  transducer 
circuit  was  obtained  by  adding  the  Input  capacitance  of  the  oscilloscope  plug-ln 
unit  to  the  measured  capacitance.  The  voltage  amplification  method  was'imployed 
to  record  the  response  of  each  of  the  embedded  crystals. 

ne  limestone  block  was  adjusted  by  means  of  the  three  perpendicular  motions 
f  fable  for  aligning  the  chosen  impact  position  on  the  rock  face  with  the 
loading  bar.  The  motion  of  the  table  parallel  to  the  gun  was  used  to  keep  the 
input  crystal  sandwiched  firmly  between  the  free  surface  of  the  rock  and  this  bar. 

At  each  impact  location  the  rock  surface  was  prepared  in  the  manner  described 
in  II. 7  so  as  to  attach  a  lead  wire  for  measuring  the  input  pulse  but  still  allowing 
the  crystal  to  have  a  good  flat  contact  with  the  free  surface  of  the  rock.  The 

second  lead  wire  was  again  attached  to  the  aluminum  loading  bar  close  to  the 
crystal  station. 

The  input  pulse,  generated  by  shooting  a  3/l6"  dia.  steel  ball  with  an  air 
gun,  and  the  internal  measurement,  called  the  outputs,  were  recorded  on  Tektronix 
fype  56 5  dual  beam  oscilloscopes.  A  number  of  measurements  were  taken  for 


1"P,0t  l0,':tl0n,•  P°r  MCh  «**  P°flitl°n  the  experiment  was  repeated 
to  Chech  reproducibility,  ».  allude  of  tb.  Input  pule,  was  varied  by  changing 

th'  V'l0CUy  °f  th'  b>U  bP  “«*"*  air  reservoir  preseures.  In  Iibl.  3 

a  summary  of  th.  Impact  locations,  measured  stresses  and  appropriate  scale  factors 

for  the  various  record,  are  given.  Each  station  sensed  the  normal  stress  along 

the  crystal  axis,  l.e.  l„  the  direction  of  the  transducer  bar.  For  exmaple, 

referring  to  Fig.  8,  stations  1  and  4  measured  0  and  station*  o  * 

ICU  azz  81111  Nations  2  and  3  measured 

axx* 

»o  attempt  .a.  made  to  determine  th.  Impact  velocities,  since  the  Input 

puis,  vas  observed  directly  and  such  a  method  of  measurement  was  found  to  be 

reliable  a.  described  in  II.7,  it  .as  not  deemed  necessary  to  ascertain  the  velocities 

or  impact  and  rebound  and  to  verify  the  Input  Ispulse  by  determining  the  change  of 

momentum.  At  higher  Impact  velocities,  this  procedure  could  not  be  employed  since 

brea^e  of  the  crystal  would  occur;  In  this  event,  th,  sensor  could  be  replaced 

by  a  set  of  strain  gage,  mounted  on  the  losing  bar  that  would  delineate  the  Input 

“  th'  dl"er'nC'  bet’re'n  th'  »<•  the  initial  and  the  first  reflected 

pulse  passage. 

A  detailed  discussion  of  th,  result.  Is  given  In  Section  VII!.  It  1.  only 

mentioned  here  that  the  data  agreed  well  vi+ii  •fvr*  d-v. 

«  sgreea  well  with  the  theoretical  values  for  arrival 

time,  and  stress  histories  a.  depleted  In  Fig.  1  of  th.  main  report  and  Figs,  i, 

to  1?  (s«  Table  3),  Indicating  that  the  calibration  procedure  was  valid  and  th. 

embedding  technique  war  satisfactory.  Th,  bonding  agent  also  proved  effective 

and  the  experimental  techniques  developed  provided  a  reliable  mean,  of  detecting 
and  recording  body  waves. 
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Section  IV 

Body  Wave  Propagation  In  An 
Anisotropic  Rock  Model 

TV .  1  Direction  of  the  Axis  of  Elastic  Symmetry. 

The  main  objective  of  the  present  experimental  investigation  was  the  study 
of  body  wave  propagation  in  an  anisotropic  half-space  modeled  by  a  20"  x  20"  x  10" 
block  of  Yule  marble  that  represented  a  transversely  isotropic  half-space  with  the 
axis  of  elastic  symmetry  in  a  plane  parallel  to  the  20"  x  20"  free  surface.  In 
a  previous  surface  wave  investigation^2^)  involving  the  same  block  the  axis 
of  elastic  symmetry  was  located  by  crystallographic  analysis  of  a  thin  sample 
prepared  from  a  trapezoidal  piece  of  material  cut  from  one  comer  of  the  block. 
However,  in  Ref.  (9)  the  authors  expressed  some  uncertainty  about  the  actual 
direction  of  the  axis  of  elastic  symmetry  (AES).  In  the  course  of  the  present 
work,  another  attempt  was  made  to  determine  the  direction  of  the  AES.  Another 
crystallographic  analysis  did  not  locate  this  direction  with  any  more  accuracy, 
but  the  discolorations  in  the  block  due  to  impurities  indicated  that  the  AES 
might  be  located  about  15°  from  the  one  previously  determined,  as  sketched  in 
Figs.  13  and  l4.  However,  the  body  wave  measurements  were  expected  to  give 
additional  evidence  through  wave  arrival  times  to  substantiate  the  direction  of 
the  AES. 

IV. 2  Determination  of  Transducer  Locations. 

With  the  AES  located  as  shown  in  Fig.  13,  the  transducer  locations  had  to  be 
determined  so  that  (i)  The  transducers  may  be  utilized  to  detect  and  record  body 
wave  propagation  due  to  the  impact  of  a  sphere  on  the  free  surface  of  the  block 
without  interference  by  reflections  from  the  boundaries;  (ii)  The  distances  of  the 
transducers  f-om  the  impact  position  were  such  that  the  signal  to  noise  ratio  would 
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allow  the  detection  of  the  transients  initiated  on  the  free  surface  by  shooting 
3/l6"  diameter  or  l/4"  diameter  steel  balls  from  an  air  gun  at  velocities  which 
would  not  break  the  input  crystal;  (iii)  The  various  observation  points  in  the 
interior  of  the  block  would  yield  wave  arrival  times  along  a  number  of  rays 
oriented  at  different  directions  to  the  AES;  (iv)  The  transducers  would  yield 
representative  stress  histories,  each  transducer  measuring  the  stress  in  a 
specific  direction  at  the  observation  point  relative  to  the  impact  location, 
and  (v)  Advantage  was  taken  of  the  symmetry  of  the  block  in  locating  the 
transducers  so  as  to  obtain  stresses  in  different  directions  but  effectively 
at  the  same  location  relative  to  the  impact  position. 

The  signal  to  noise  ratios  from  the  previous  experiments  on  the  limestone 
block  and  a  comparison  of  the  sensitivities  of  the  3 / 16 "  diameter  transducers 
employing  l/8"  diameter  PZT-5  crystals  used  in  these  experiments  with  the 
sensitivities  of  the  1/8"  diameter  transducers  employing  l/l6"  diameter 
PZT-4  crystals  for  measurements  in  the  Yule  marble  block  indicated  that  the 
transducers  could  be  located  up  to  about  5"  from  the  impact  position.  The  transducers 
were  required  to  detect  the  body  waves  produced  by  the  impact  of  a  sphere  on  the 
free  surface  achieved  by  shooting  a  3/l6"  diameter  ball  at  velocities  comparable 
to  those  employed  in  the  limestone  block  experiments  without  either  significant 
noise  or  without  breaking  the  l/8"  diameter  crystal  that  monitored  the  input.  A 
drop  test  of  a  1/4"  diameter  steel  sphere  from  a  height  of  about  4  feet  on  the  top 
of  a  sandstone  block  with  a  transducer  held  against  the  side  of  the  target  indicated 
the  capability  of  transducers  to  detect  pulses  of  the  level  described  above. 
Eventually  l/4"  diameter  x  0.1"  thick  x-cut  quartz  crystals  were  also  used  for  the 
measurement  of  the  input  pulse  that  were  capable  of  withstanding  higher  input 
stress  levels  and  hence  offered  better  conditions  of  measurement.  In  fact,  the 
transition  from  the  3/l6"  diameter  to  1/8"  diameter  transducers  was  made  after 
taking  into  f.ccount  the  above  considerations.  There  was  no  further  need  to  determine 
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an  acceptable  signal  level  for  the  present  experiments. 

The  center  of  the  surface,  designated  Pq  in  Fig.  15,  was  chosen  as  the 
principal  impact  location.  The  pulse  length  obtained  in  the  limestone  block 
experiments  ranged  from  30  to  40  ^ec  and  was  expected  to  be  about  the  same  for 
the  marble.  This  block  was  10"  deep  and  previous  experiments  on  the  specimen 
indicated  that  the  fastest  wave  speed  corresponded  to  about  5  p.sec/in  in  the 
direction  of  the  depth.  It  was  thus  estimated  that  the  first  passage  of  the 
pulse  could  be  recorded  up  to  a  distance  of  5"  from  the  impact  location  without 
interference  due  to  reflections  from  the  boundaries.  Thus  the  size  of  the  block, 
the  transducer  sensitivity,  the  length  of  the  pulse,  the  velocity  of  impact,  the 
requirements  of  the  input  measurements  and  the  fact  that  the  response  was 
required  at  a  sufficiently  large  distance  away  from  the  impact  position  (so  that 
it  could  be  considered  essentially  as  the  response  due  to  a  concentrated  load  of 
arbitrary  time  variation  as  was  assumed  in  the  integral  transform  method  (Appendix  A)) 
all  had  to  be  considered  in  determining  the  positions  of  the  transducers. 

The  locations  of  the  transducers  should  be  such  as  to  display  all  the 
distinctive  features  of  the  wave  propagation  phenomena  as  suggested  by  theoretical 
predictions.  Originally,  significant  differences  in  the  slowness  surface  from 
the  corresponding  isotropic  case  were  expected  on  the  basis  of  the  dynamic  elastic 
constants  cited  in  Ref.  (9)  that  resulted  in  a  tripartition  of  wave  surface;  the 
initial  selection  for  the  transducer  positions  reflected  these  characteristics. 
However,  the  present  body  wave  measurements  resulted  both  in  a  relocation  of  the 
axis  of  elastic  symmetry,  as  shown  in  Fig.  14,  as  well  as  in  new  dynamic  elastic 
constants,  as  described  in  Section  VIII,  that  did  not  predict  a  wave  surface 
partition.  Hence,  the  exact  locations  of  the  transducers  no  longer  needed  to 
correspond  to  any  particular  behavior  of  the  wave  propagation  phenomena  except 
that  they  were  conveniently  located  to  yield  the  wave  arrival  times  and  stress 
histories  which  could  be  compared  with  corresponding  theoretical  predictions. 
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Hie  transducer  locations  are  shorn  in  Pigs.  16  to  21.  Impact  positions 

other  than  the  center  of  the  free  surface  were  also  employed,  primarily  to  obtain 

information  on  body  waves  detected  by  transducers  located  nearer  to  the  Impact 

position,  such  data  were  called  the  near  field  response  of  the  block  while  the 

data  obtained  by  central  impact  were  termed  the  far  field  response.  The  near 

field  data  were  obtained  primarily  for  comparison  with  corresponding  results 

obtained  by  the  finite  element  method  which  was  not  particularly  suitable  for 

far  field  comparison  due  to  excessive  computing  time  required  to  secure  numerical 
results. 


IV* 3  Transducers  Employed. 

Transducers  in  the  form  of  1/8"  dia.  magnesium  bars  with  the  crystal  assembly 
on  one  end,  as  shown  in  Fig.  3,  employing  PZI-4  crystals  as  the  transducer 
element  were  used  for  the  body  wave  measurements.  Care  was  taken  in  the 
assembly  of  the  transducers  to  preserve  the  outside  dimension  of  0.126  +  0.001", 
Which  was  the  diameter  of  the  bar,  especially  near  the  crystal  end.  The  transducers 
were  identified  and  externally  calibrated  using  the  procedure  described  in  Section 
II.  linearity  of  response,  repeatability  and  reproducibility  were  established. 

The  polarity  of  individual  transducers  was  also  determined.  A  total  of  18 
transducers  were  selected  for  the  body  wave  measurements.  The  correlation  with 
the  in  situ  calibration  in  rock  bars  and  subsequent  verification  of  this  by  the 
measurements  in  the  limestone  block  provided  a  means  of  obtaining  individual 
stress  factors  for  the  transducers  (see  Table  3). 

17,11  Preparation  of  the  Yule  Marble  Block. 

The  general  technique  of  drilling  the  Yule  marble  block  was  the  same  as  that 
employed  for  drilling  the  limestone  block,  described  in  Section  in.  Previous 
experience  with  slabs  and  rock  bars  showed  that  long  holes  of  small  diameter  could 
be  drilled  straight  and  smooth  in  Yule  marble  fabric  with  diamond  core  drills. 
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The  drills  employed  were  1/8”  In  diameter  (0.128"  ;  0.001")  purchased  from 

Keen-Kut  Products,  Burlingame,  California. 

The  block  was  marked  for  drilling  with  depths  of  the  holes  carefully  noted. 

Pilot  holes  were  made  with  an  electric  hand  drill  to  facilitate  the  starting  of 
the  core  drill.  During  these  operations,  care  was  taken  to  keep  the  center  of 
the  drill  free  from  any  clogged-up  or  powdered  material  so  that  a  profuse  supply 
of  water  was  constantly  kept  flowing  down  its  center.  The  operations  of  drilling, 
finishing  of  the  holes  by  means  of  a  0.128"  dia.  flat  bottomed  extended  fluted 
drill  and  subsequent  clearing  of  the  holes  to  remove  excess  powdered  rock  material 
were  performed  as  described  in  Section  III.  Straight  holes  with  smooth  sides  of 
the  required  diameter  were  obtained.  It  was  noticed  that  there  was  no  significant 
drift  of  the  core  drill  even  in  the  drilling  of  the  deeper  holes;  the  maximum 
depth  was  about  8§",  as  checked  by  Inserting  a  l/8"  dia.  bar  in  the  holes  and 
verifying  that  the  extended  bar  was  normal  to  the  rock  surface.  total  of  18 
holes  of  various  depths  were  drilled,  6  from  each  of  three  sides  of  the  block. 

The  three  directions  corresponded  with  the  X.Y.Z  axes  defined  in  Fig.  14. 

The  previously  calibrated  transducers  were  installed  in  the  holes  following 
the  same  procedure  as  described  in  III.3.  A  mixture  of  aluminum  oxide  and  epoxy 
was  again  used  as  the  bonding  agent.  Similar  precautions  as  described  in  III. 3 
were  taken  to  make  sure  that  the  crystal  assembly  ends  of  the  transducers  were 
securely  anchored  at  the  bottom  of  the  holes.  Heat  was  applied  to  the  rock  by 
means  of  two  infrared  heat  lamps  and  the  bonding  agent  was  allowed  to  cure  for 
a  day.  As  before,  Endevco  low-noise  cables  about  5'-0"  long  were  soldered  to  the 
transducer  leads  and  the  ends  of  the  cables  were  provided  with  WC  connectors. 

XV. 5  Body  Wave  Propagation  Measurements. 

The  experimental  arrangement  for  the  Yule  marble  tests  was  similar  to  that 
shown  in  Fig.  9.  The  block  was  arranged  on  the  table  employed  previously  for  the 


limestone  clock,  it  was  found  convenient  to  fix  the  loading  arrangement  which 

Ie~Ular  “*  f"e  “  —  «  ~  «  -Justed.  The  name  method  of 
input  generation  and  measurement  by  charge  amplification  as  used  on  previous 

occaalona  »a.  again  employed.  This  time  since  circular  x-c„t  quarts  crystals 

1/8  '  diameter  or  1/4"  diameter  were  utilised,  a  loading  bar  of  the  same  diameter 
as  the  crystal  was  used  to  transmit  the  pulse. 

Three  Tektronix  type  *5  dual  be.  oscilloscopes  were  employed  for  recording 
the  outputs  from  three  embedded  transducers  for  each  is*eet.  The  input  was 
recorded  simultaneously  on  the  three  oscilloscopes  along  with  the  respective 

outputs  so  that  the  wave  arrival  times  could  be  directly  obtained  for  each 
transducer  location. 

«ost  of  the  data  were  obtained  by  central  impact  on  the  free  surface 
designated  P„  in  Pig.  15  although  other  impact  locations,  P^ . . 

were  also  used.  Por  detecting  and  recording  the  body  waves  by  some  of  the 
Bore  distant  transducers  at  asymmetrical  stations,  an  input  pulse  with  a  higher 
level  was  required.  However,  this  would  have  broken  the  l/8"  diameter 
crystal  mi  damaged  the  rock  surface  at  the  ispect  location;  thus,  it  was  found 
expedient  to  use  a  1/4"  diameter  x  0.1"  thick  x-cut  quarts  crystal  for  the 
nonsymmetrical  ispact  locations.  The  smaller  crystal  was  adequate  for  measuring 
th'  lower  rt"»  ^  «■**  Pulse  from  central  l^act.  Both  3/16"  diameter  ami 
1/V  diameter  steel  balls  were  used;  the  latter  produced  an  Increase  of  about 
10  „secs  in  the-pulse  length.  With  the  unsymmetrical  impact  positions,  some  of  the 
transducers  were  about  1-3/4"  from  the  i^act  locations.  responses  from 
these  transducers  were  recorded  to  obtain  the  near  field  response  of  the  block. 

In  addition  to  the  above  body  wave  measurements,  transducers  at  special 
locations  relative  to  the  AES  were  chosen  to  determine  arrival  times  along 
directions  parallel  to  the  AES  inside  the  block  and  along  directions  parallel 
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to  the  A E£  as  determined  previously  .  These  measurements  were  made  primarily 
to  compare  the  wave  speeds  along  a  number  of  directions  parallel  to  the  initially 
determined  and  the  relocated  AE?  so  as  to  yield  additional  evidence  regarding  thtf 
exact  location  of  the  AES. 

The  capacitance  of  each  transduce/  circuit  was  measured  before  and  after 
taking  the  data  and  the  average  value  ol  the  two  measurements  plus  the  input 
capacitance  of  the  oscilloscope  plug-in  unit  was  taken  as  the  approximate  true 
capacitance  of  the  circuit.  Usually  a  difference  of  +  2%  was  observed  in  the  two 
measurements.  The  external  calibration  constantc  of  the  transducers,  the  total 
transducer  circuit  capacitances  for  the  body  wave  measurements  and  the  corresponding 
stress  factors  are  listed  in  Table  1*.  The  various  runs  are  described  in  Table  5a  and  5b. 

Se/tlon  V 

Surface  Wave  Propagation  In 
The  Anisotropic  Rock 

V.l  Anisotropic  Model  for  Surface  Waves. 

A  second  Yule  marble  block  of  the  same  dimensions  as  the  one  employed  for 
body  wave  measurements  and  with  the  axis  of  elastic  symmetry  also  located  in  a 
plane  parallel  to  the  20"  x  20"  free  surface,  was  used  to  study  surface  wave 
phenomena.  The  direction  of  the  AES  was  determined  from  the  discoloration 
pattern  on  the  various  sides  of  the  block.  The  crystallographic  analysis  of  a 
specimen  prepared  from  sample  material  cut  off  from  one  corner  of  the  previous 
block  indicated  that  the  discoloration  lines,  which  were  approximately  paralj-e,. 
on  any  one  faoo  of  the  block,  correspond  to  the  foliation  plane,  i.c.  to  a 
plane  perpendicular  to  the  AES.  The  average  directional  properties  of  these 
lines  on  all  sides  of  the  block  indicated  that  the  foliation  plane  was  perpendicular 
*c  the  free  surface.  From  these  observations,  it  appeared  that  the  determination 
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of  the  direction  of  the  AES  no  a  Hne  pedicular  to  the  averse  direction  of 
the  discoloration,,  on  the  free  surface  was  valid.  In  the  same  Banner,  the  AES 
of  the  second  block  was  located  as  a  line  perpendicular  to  the  discolorations  on 
the  fee  surface,  the  overall  pattern  of  these  lines  again  suggested  that  the 
foliation  plane  was  perpendicular  to  the  free  surface.  In  Fle.  22,  the  ^  of 
the  second  block  and  the  coordinate  system  chosen  are  shown. 

Objectives. 


The  objectives  of  the  surface  wave  propagation  investigation  were, 

(1)  To  embed  suitably  modified  transducers  Just  below  the  free  surface  to 
measure  the  dynamic  radial  and  circumferential  stresses  at  given 
locations  due  to  normal  sphere  impact; 

(ii)  To  obtain  arrival  times,  and; 

(111)  To  compare  the  experimental  data  with  corresponding  theoretical 


results. 

The  general  experimental  techniques  and  the  method,  of  measurement  developed 

in  the  course  of  body  wave  measurements  were  still  applicable.  However,  the  trans- 

ducers  bad  to  be  modified  after  Individual  external  calibration  for  embedment  Just 
below  the  free  surface. 


V.3  Transducer  Modification. 

In  order  to  measure  stresses  Just  below  the  surface,  It  was  intended  to  drill 
small  slots  on  the  surface  of  the  block  and  embed  transducers  in  the  slots. 
h'  °f  thc“  transducers  was  essentially  the  seme  as  the  earlier 

nC  WMCh  ““  «-'Tt  that  magnesium  end  pieces  replaced  the  aluminum 

end  pieces  employed  previously.  However,  Instead  of  constructing  transducers 
in  this  manner,  the  following  procedure  was  adopted.  The  transducer  in  the  form 
f  a  1  •  diameter  magnesium  bar,  with  a  1/16"  die.  x  0.020"  thick  PZT-b  crystal 
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element,  was  assembled  leaving  out  the  lead  wires.  Two  1/64"  dia.  and  l/l6" 
deep  holes  were  drilled,  one  in  the  bar  and  one  in  the  end  piece  and  wire  leads 
were  attached  in  the  holes  with  Electrobond  $2016  conducting  epoxy  adhesive. 

The  transducer  was  then  externally  calibrated.  The  magnesium  bar  was  now  cut  off 
in  a  lathe.  Thus,  a  transducer  was  obtained  as  required  that  had  already  been 
calibrated.  Such  a  procedure  was  adopted  because  the  transducer  in  the  form  of 
a  bar  could  be  calibrated  and  disengaged  easily  from  the  split  Hopkinson  bar 
arrangement  as  explained  in  II. 4,  while  a  similar  separation  after  calibration 
of  the  final  form  of  the  transducer  would  have  presented  some  difficulties  in 
that  respect. 

V.4  Location  and  Installation  of  Transducers. 

The  AES  of  the  Yule  marble  block  was  marked  on  the  free  surface.  The 
transducer  locations  were  chosen  to  measure  the  radial  and  circumferential 
stresses  as  shown  in  Fig.  22.  To  measure  the  radial  stress,  the  crystal 
compression  mode  direction  must  coincide  with  a  radial  line  and  to  measure  the 
circumferential  stress,  it  must  be  perpendicular  to  a  radial  line  as  shown  in 
Fig.  23. 

From  the  center  of  the  free  surface  a  circle  of  5"  radius  was  drawn. 

Diametral  lines  were  marked  off  every  15°  from  the  AES.  Locations  were  chosen 
on  either  end  of  the  10"  diameters,  one  end  of  the  diameter  for  the  radial  stress 
and  the  other  end  for  the  circumferential  stress  measurement. 

To  embed  the  transducers  just  below  the  free  surface,  small  holes  with  dimen¬ 
sions  of  1/4"  x  1/4"  x  1/8"  were  milled  with  a  3/32"  dia.  end  mill.  A  total  of 
l4  clots  were  made  including  two  on  the  AES  and  two  on  a  perpendicular  axis 
that  represented  the  direction  of  the  foliation  plane.  The  slots  were  l/8J'  ' 
deep  identical  to  the  diameter  of  the  transducer  so  that  the  average  stress 
measured  corresponded  approximately  to  the  stress  at  a  point  l/l6"  below  the  surface. 
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The  slots  were  cleaned  with  acetone  and  allowed  to  dry.  The  transducers  were 
embedded  in  the  slots  using  a  mixture  of  aluminum  oxide  and  epoxy  as  the  bonding 
agent  and  low  noise  cables  were  attached  to  the  exposed  lead  wires. 

V.5  Surface  Wave  Propagation  Measurements. 

The  experimental  arrangement  was  similar  to  that,  shown  in  Fig.  9.  The 
input  measurement  and  the  loading  bar  arrangement  was  similar  to  the  system  used 
previously.  A  l/4"  dia.  aluminum  loading  bar  and  a  circular  x-cut  quartz  crystal 
l/4"  dia.  x  0.1"  thick  were  used.  The  input  pulse  was  initiated  by  shooting  a 
l/4"  dia.  steel  ball  with  an  air  gun.  A  central  impact  location  was  chosen  with 
all  the  transducers  located  at  a  5"  radius  from  the  impact  position.  Two 
Tektronix  type  5&5  dual  beam  oscilloscopes  were  utilized  to  record  simultaneously 
the  outputs  from  two  transducers  located  on  either  end  of  a  diametral  line. 

Since  the  diametral  line  represented  a  ray  at  a  certain  angle  to  the  AES,  both 
lying  in  the  plane  of  the  free  surface,  the  two  transducers  effectively  measured 
the  propagation  of  the  pulse  at  the  same  point  relative  to  the  impact  location. 
The  input  was  also  simultaneously  recorded  on  the  same  dual  beam  oscilloscopes. 
The  other  techniques  of  measurement  utilized  for  the  body  wave  measurements  were 
again  employed.  The  external  calibration  constants  of  the  transducers  employed 
are  listed  in  Table  6,  which  includes  the  total  transducer  circuit  capacitances 
and  the  corresponding  stress  factors  for  internal  measurements.  The  various  runs 
are  described  in  Table  7. 


Section  VI 


Summary  of  the  Experimental  Investigation 


V1,1  — ess  Factors  from  External  Calibration  Constant B 

Tiie  various  stress  factors  are  listed  in  Tables  3,  4  and  6 
a  1  volt  output  from  the  transducers,  i.e.,if  the  gain  level  for 
was  5  mv/di v,  the  stress/div  was  (5  x  10"3  x  stress  factor)  psi. 


corresponding  to 
a  measurement 


V1,2  g_°dy  Wave  Measurements  in  the  Isotropic  Model. 

The  details  of  the  input  and  output  measurements  for  the  body  wave  tests 
in  limestone  are  given  in  Table  3.  The  corresponding  figures  depicting  the  input 
and  output  data  are  also  listed.  The  dynamic  elastic  properties  of  limestone 
employed  in  the  two  theoretical  analyses  were(l0) 


Young's  modulus,  E  =  5.0  x  106  psi 
Poisson's  ratio,  p,  =  0.29 
Density  ,  p  =  0.0805  lb/in3 

VI*3  Body  Wave  Measurements  in  the  Yule  Marble  Block. 

The  body  wave  measurements  in  the  Yule  marble  block  are  described  in  Tables  5(a) 
Mid  5(b) .  The  dynamic  elastic  properties  of  Yule  marble  are  listed  in  Table  4, 
Appendix  D.  The  procedure  of  determining  the  properties  from  the  body  wave  and 
surface  wave  measurements  on  the  Yule  marble  blocks  is  included  in  Section  VII. 

VI-1>  Surface  Wave  Measurements  In  the  Yule  Marble  Block. 

The  surface  wave  measurements  are  described  in  Table  7  which  includes  the 
details  of  input  and  output  measurements  and  a  list  of  the  corresponding  figures. 
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Section  VII 

Determination  of  Dynamic  Elnnt.^ 

Properties  From  Arrival  Times 

VI1,1  Dynamic  Elastic  Constants  of  Yule  Marble. 

In  the  course  of  previous  theoretical  and  experimental  Investigations  of 
surface  waves  produced  by  the  normal  Impact  of  a  sphere  on  a  half. space 
modeled  by  one  of  the  Yule  marble  blocks'2)  which  was  again  used  in  the  present 
investigation,  the  theory  was  developed  for  linearly  elastic  constitutive  behavior 
of  the  material.  The  dynamic  values  of  the  elastic  constants  were  determined 
from  the  measurements  of  wave  speeds  along  specific  directions  In  the  block. 

In  addition,  the  static  and  dynamic  properties  of  the  material  were  also  determined 
from  samples  of  the  material  cut  from  the  block  by  means  of  atsndard  procedures. 
However,  in  the  more  extensive  experimental  investigation  described  In  Appendix  D, 
the  dynamic  elastic  of  Yule  marble  were  again  obtained  from  samples  of  a  slab 
secured  from  another  source,  since  the  two  sets  of  values  appeared  to  differ 
in  some  respects  (Table  k,  Appendix  D)  a  procedure  was  devised  to  determine 
the  constants  by  utilizing  the  actual  body  wave  and  surface  wave  measurement, 
from  the  two  blocks  of  Yule  marble.  The  procedure  of  determining  the  constants 
was  based  on  formulating  a  programming  problem  for  the  minimization  of  a  function 
of  an  arbitrary  number  of  variables.  A  least  square  approximation  method  was 
applied  to  devise  an  objective  function  using  the  velocity  equation  for  the 
propagation  of  elastic  waves  in  a  transversely  isotropic  medium'11’.  Rosenbrock's 
method  of  functional  optimization  was  used  for  the  minimization. 

VI1*2  glaatic  Stiffness  Matrix  and  Velocity  Equation. 

•me  coefficients  of  the  generalized  Hooke's  law  are  also  referred  to  as  elastic 
stiffnesses.  Their  matrix,  which  reduces  to  a  6  x  6  symmetric  matrix  due  to  the 


symmetry  of  the 
definite  energy 
stiffnesses  for 
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stress  and  strain  tensors,  the  constitutive  law,  and  a  positive 
function  may  be  shown  to  have  the  following  non-zero  elastic 
a  transversely  isotropic  material 


C11  "  C22,C33 
C12,C13  =  C23 

'Uli  ■  c55  (C'6) 

°66  *  i(circ18> 

A  set  of  five  independent  constants  completely  specifies  the  elastic  behavior 
of  the  solid. 

If  the  source  of  the  disturbance  is  chosen  as  the  origin  of  an  orthogonal 
coordinate  system  (x^XgjX^),  where  the  x^-axis  coincides  with  the  axis  of  elastic 
symmetry,  the  equation  for  the  phase  velocity  of  elastic  waves  has  the  forn/11^ 

[H  -  £(l-n2)c](ll2-[(l-n2)a  +  n2h]H  +  n2(l-n2) (ah-d2) }  -  0  (C-7) 


Here 


tt  =  C11  •  CW 
C  “  C11  -  C12  -  2ci*U 

d  *  c13  +  CUU  (c_8) 

h  "  C33  ' 

H  -  e  v2  -  cul4 

p  is  the  density  of  the  material,  v  is  the  phase  velocity  and  n  i3  the  direction 
cosine  of  a  radius  vector  from  the  origin  with  respect  to  the  r^-axis.  The 
equation  gives  the  phase  velocity  as  a  function  of  orientation  of  a  certain 
direction  with  respect  to  the  axis  of  elastic  symmetry  and  constitutes  a  sextic 


in  v  that  has  three  real  roots. 
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With  the  aid  of  Eq.  (C-7),  the  geometrical  features  of  the  velocity  and 
slowness  surfaces  for  a  particular  set  of  elastic  constants  can  be  studied. 
However,  the  present  discussion  is  concerned  only  with  the  following  concepts^11] 
With  the  source  of  the  disturbance  of  the  medium  chosen  as  the  origin, 
the  velocity  surface  is  formed  by  all  the  radius  vectors  passing 
through  the  origin,  each  having  a  length  proportional  to  the  phase 
velocity  permissible  in  its  direction.  Thus,  Eq.  (C-7)  represents 
three  sheets  of  the  velocity  surface;  the  first  factor  is  associated 
with  a  true  transverse  displacement  expressed  by 

H  -  |-(l-n2)c  =  0 

and  the  second  factor  is  a  quadratic  in  H  and  represents  the  other 
two  sheets  of  the  velocity  surface  which  cannot  be  separately 
factored.  The  latter  may  also  be  written  as 

(H-n^aKH-n2^  -  m2n2d2  =  0 

where  1-n2  =  m2  ^C-:i 

(ii)  In  view  of  the  elastic  symmetry  of  the  block  and  the  chosen  coordinate 

system,  the  orientation  of  a  given  direction  is  completely  determined 
by  one  direction  cosine  with  respect  to  the  axis  of  elastic  symmetry 
(x3). 

(iii)  The  first  factor  of  Eq.  (C-7)  is  associated  with  a  pure  shear  velocity 
but  the  second  factor  is  neither  associated  with  a  pure  shear  velocity 
nor  a  pure  longitudinal  velocity  except  in  specific  directions,  namely, 
along  the  coordinate  axes. 


VII. 3  Velocities  from  Experimental  Measurements. 

With  the  embedded  transducers,  the  detection  and  recording  of  wave  propagation 
processes  in  the  two  Yule  marble  blocks  furnished  the  wave  arrival  times  at  various 
locations  situated  in  different  directions  relative  to  the  impact  points.  From 
these  arrival  times  and  the  distances  of  the  transducers  from  the  various  impact 
positions,  wave  speeds  in  different  directions  were  calculated.  These  do  not 
truly  represent  p-wave  phase  velocities  even  though  they  were  calculated  from  the 
first  arrival  of  the  wave  because  the  wave  propagation  undergoes  considerable 
refraction^  )  However,  since  the  maximum  difference  in  the  p-wave  velocities 
along  the  x^-axis  and  x1  or  axis  was  about  20$,  it  was  assumed  that  the 
experimental  wave  speeds  may  be  considered  as  the  approximate  p-wave  velocities. 

The  coordinate  axes  are  directions  along  which  exact  p-wave  velocities 
would  be  obtained.  Both  the  body  wave  and  the  surface  wave  measurements 
furnished  information  regarding  the  approximate  p-wave  velocities  in  a  number 
of  directions  relative  to  the  axis  of  elastic  symmetry  (x^-axis).  In  addition, 
an  examination  of  the  surface  wave  records  indicated  that  the  Rayleigh  wave 
velocity  was  approximately  65$  of  the  corresponding  p-wave  speed  in  any  given 
direction.  Since  the  Rayleigh  wave  speed  differs  but  little  from  the  shear 
wave  speed,  it  was  assumed  that  the  latter  also  bears  approximately  the  same 
relationship  to  the  p-wave  velocity  along  any  particular  direction  (see  VII.8(V)). 

VII. 4  Determination  of  and  c^  from  p-Wave  Tests 

The  constants  c^  and  c^  are  each  associated  with  the  p-wave  speeds  along 
the  AES  and  in  the  isotropic  plane  normal  to  this  axis.  The  fact  that  these 
two  extremal  p-wave  speeds  are  each  associated  with  a  distinct  elastic  constant 
may  be  seen  by  putting  n  =  0  and  n  =  1  in  Eq.  (C-10). 
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n  =  0  :  p  t2  =  cu  (C-ll) 

n  =  1  :  p  v2  =  c33  (c-12) 

This  will  not  occur  in  Eq.  (C-7)  because  the  first  factor  is  associated  with  a 
true  transverse  displacement.  Thus,  c n  and  c33  were  obtained  directly  from 
the  measured  p-wave  speeds.  The  directions  of  the  AES  (x3)  and  the  normal  to 
the  AES  (either  or  Xg)  exhibited  purely  longitudinal  wave  velocities  of 
162, 0J0  in/sec  and  210,000  in/sec, respectively.  Hence  the  elastic  constants 
CH  and  c33  were  found  to  be  6.5  x  1C^  and  12.0  x  10^  psi. 

The  density  of  Yule  marble  was  determined  by  measuring  the  dimensions  of 
conveniently  shaped  samples  of  the  material  (the  samples  w<:re  taken  from  the  slab 
and  not  from  the  two  blocks  but  this  inconsistency  was  ignored)  and  weighing 

the  samples  on  a  precision  balance.  It  is  to  be  noted  that  the  values  of  the  two 

constants  lie  in  between  the  corresponding  values  cited  previously.  A  total  of 
40  values  of  the  p-wave  speeds  were  obtained  for  as  many  independent  directions 
with  respect  to  the  AES. 


vn*5  Requirements  Imposed  by  the  Positive  Definite  Form  of  the  Strain  Energy. 

In  Ref.  (13),  it  was  shown  that  the  necessary  and  sufficient  condition  for 
the  quadratic  form  of  the  strain  energy  to  be  positive  definite  for  the  particular 
case  of  a  transversely  isotropic  material  implies  that 


CH  >0  ,  c„  >0  ,  ckk  >0  ,  Cl1  >c 


'33 


41+ 


'11  12 


-Kcn  +  c12>-  c33>c132  ,  cn  •  c33  >o132 


(c-13) 


It  is  to  be  noted  that  there  is  no  restriction  that  c12  and  c^3  should  be 


positive. 
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VII. 6  Fomulatlon  for  Determining  the  Elastic  Constants. 

The  objective  function  formed  as  a  sum  of  the  squared  deviations 

R  =  <Hi-i<1-ni2)c)2CHi2-C(1-ni2)a  +  n^h]^  +  ni2(l-ni2)(ah-d2)}2 

where  ^  ■  p  v2  -  c^  (C-l4) 

The  elastic  constants  were  chosen  as  the  variables  jested, ..  .5)  with 

X1  =  cn>  x2  “  °33>  x3  =  c44>  x4  =  ci2  x5  a  ci3>  a  sixth  variable  x^  was 
chosen  to  represent  the  ratio  of  an  approximate  p-wave  velocity  to  an  approximate 

shear  wave  velocity  in  the  same  given  direction.  The  minimization  of  the 

objective  function  P(Xj),  j*l,...,6  subject  to  the  constraints  specified  by 

inequalities  (C-13)  was  expected  to  yield  the  optimum  values  of  x . .  Since 

J 

previously  measured  values  of  the  elastic  constants  as  well  as  the  two  values 
of  C11  and  c33  obtained  from  the  present  tests  were  available,  the  inequality 
constraints  were  reduced  to  a  set  of  equality  constraints,  the  extreme  admissible 
values  still  satisfying  the  inequalities  (C-13).  The  set  of  initial  values  re¬ 
quired  were  then  chosen  so  as  to  include  the  two  values  of  c^  and  c^  already 
established  and  other  data  for  c^g,  c^  and  c^^  lying  between  the  corresponding 
values  of  the  two  sets  of  constants  obtained  previously, 

VII. 7  Minimization  Technique. 

The  minimization  of  the  objective  function  was  performed  by  means  of  a  computer 
program  that  was  divided  into  two  parts.  The  first  part  served  to  control  the 
program,  to  compute  the  velocities  and  to  calculate  the  objective  function  using 
the  initial  values  of  the  variables  as  specified  above.  The  second  part  involved 
the  minimization  using  a  standard  library  subroutine,  CLIMBS.'  The 
latter  was  constructed  based  on  a  method  devised  in  Ref. (12).  The  main  program 
calls  the  minimization  subroutine  CLIMBS  which  in  turn  repeatedly  calls  the 
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subroutine  to  compute  the  value  of  the  objective  function  for  any  values  for  the  v 

j 

The  search  for  optimal  Xj  was  terminated  by  a  predetermined  convergence  criterion. 
The  minimization  of  the  objective  function  was  performed  in  a  number  of  steps. 

At  each  step  the  initial  values  and  constraints  were  appropriately  altered.  The 
various  steps  were  chosen  to  put  the  emphasis  of  optimization  on  particular 
variables  representing  the  elastic  constants  at  each  stage  by  either  suppressing 
some  variables  or  constraining  them  over  a  limited  range. 

steP  1;  since  there  was  no  restriction  on  the  sign  of  c12  and  c^,  these  constants 
were  allowed  to  take  on  negative  values.  The  variable  Xg  was  omitted  and  the 
function  R  was  minimized  over  the  whole  range  of  observations.  The  initial 
values  of  x^(i=;l> . , , ,5)  were  chosen  to  satisfy  the  reduced  equality  constraints. 

The  upper  and  lower  limits  of  the  variables  were  chosen  to  include  the  previously 
obtained  values  for  the  elastic  constants. 

■steP  2:  The  SQme  procedure  was  used  as  in  Step  1  except  that  clg  and  c13  were 
also  constrained  to  be  positive. 

Step  3 :  The  first  factor  of  Eq.  (C-7 )  was  removed  from  the  velocity  equation 
since  it  represents  a  truly  transverse  displacement  and  the  approximate  p-wave 
speeds  were  again  employed  to  minimize  the  modified  objective  function 
m 

R1  =  £  0*1 -[(l-n^a  +  n±2  .  hlH,  +  ni2(l-ni2)(ah-d2))2  (c-15) 

steP  jj:  The  factor  Xg  was  introduced  as  a  constant  by  multiplying  all  the 
velocities  by  O.65  and  using  these  approximate  shear  wave  velocities  instead 
of  the  approximate  p-wave  velocities.  The  objective  function  was  taken  as  R. 
StejjJj:  The  factor  xg  was  introduced  as  a  variable  with  upper  and  lower  limits 
of  0.7  and  0.6  and  the  objective  was  again  taken  as  R. 

Step  6:  The  factor  Xg  was  introduced  as  a  variable  with  the  same  limits  as  above 


but  this  time  the  objective  function  was  R^ 


The  various  initial  values,  constraints  on  the  variables  and  the  final 
values  are  listed  in  Table  8  where  each  step  of  the  minimization  procedure  is 
identified.  The  final  values  of  the  constants  were  as  follows: 

£ 

C11  =  ^**22  x  10  psi 
°33  =  7.25  x  10  psi 

c44  =  3,33  x  1q6  ?si  (c-16) 

£ 

C-^2  =  3*82  x  10  psi 

c13  =  2.52  x  106  psi 

VII. 8  Remarks . 

The  method  of  estimating  the  dynamic  elastic  constants,  employed  to  establish 
values  of  c^,  c13  and  c^  makes  certain  approximations  regarding  the  p-wave 
velocities  in  different  directions.  However,  it  has  furnished  some  interesting 
information  in  the  course  of  the  minimization  procedure  which  appears  to  substan¬ 
tiate  that  the  values  were  representative  of  the  material,  namely, 

(i)  The  values  of  and  c^  remained  reasonably  constant  at  each  step. 

(ii)  The  introduction  of  the  variable  x 6  established  with  certainty  that 
c12  811(1  c13  were  Positive. 

(iii)  The  final  results  were  in  the  range  of  values  obtained  previously 
as  listed  in  Table  4,  Appendix  D. 

(iv)  A  reasonable  value  of  c^  was  obtained  by  introducing  the  shear  factor 

x6*  It  was  noted  in  Ref.  (9)  that  the  same  factor  could  not  be  obtained 
from  the  p-wave  tests  using  Eq.  (C-7). 
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Section  VIII 
Discussion 

VIII. 1  General  Outline 

In  this  section  the  following  matters  are  considered: 

(1)  A  discussion  of  the  information  obtained  from  the  experimental  results 

(ii)  The  comparison  of  the  experimental  results  with  the  corresponding 
theoretical  predictions;  and 

(ill)  A  critical  discussion  of  the  method  of  detecting  and  recording  wave 

propagation  phenomena  with  embedded  transducers  in  the  light  of  the 
above  comparison. 

Withe  the  input  crystals  and  an  embedded  transducer,  the  detection  and  re¬ 
cording  of  wave  propagation  processes  in  a  rock  model  furnished  the  following 
information: 

(a)  The  history  of  the  stress  component  in  the  direction  of  the  transducer 
bar  which  coincided  with  the  crystal  axis  in  compression  mode. 

(b)  The  wave  arrival  time,  determined  directly  from  the  time  difference  of 
the  two  records  obtained  on  a  dual-beam  oscilloscope  by  simultaneous 
triggering  of  the  two  traces  as  shown,  for  example,  in  Fig.  10. 

(c)  The  input  pulse  or  the  force  history  of  the  impulse  on  the  free  surface 
of  the  model  half-space  which  could  be  used  directly  to  obtain  the 
corresponding  theoretical  results  with  the  aid  of  the  computer  programs 
of  Appendices  A  and  B. 

VIII,S  Body  Wave  Measurements  in  the  Isotropic  Model. 

(i)  Experimental  Results. 

Records  were  obtained  from  three  of  the  four  transducer,  embedded  in  the 
limestone  block.  With  reference  to  Fig.  8,  body 


wave  measurements  were  recorded 


with  transducers  2,  3  and  4.  Transducer  U  detected  c  and  transducers  2  and  3 

z  z 

detected  o  .  Fig.  1  of  the  main  report  and  Figs.  10  to  12  show  the  input 
and  output  measurements;  the  corresponding  impact  locations  and  the  stresses  measured 
are  also  indicated.  The  data  were  not  extensive  since  the  main  objective  of  the 
experiments  was  primarily  to  verify  the  calibration  procedure  of  the  transducers. 

It  is  recalled,  the  latter  was  established  by  comparing  the  external  calibration 
constant  with  the  in  situ  calibration  in  rock  bars,  and  the  stress  factors  of 
the  transducers  listed  in  Table  3  were  based  on  this  correlation.  Hence  a 
comparison  of  the  experimental  stress -time  records  with  the  corresponding 
theoretical  results  was  mainly  expected  to  substantiate  generally  the  reliability 
of  the  experimental  techniques  as  well  as  the  validity  of  the  theoretical  solutions, 
(ii)  Comparison  with  Theoretical  Results. 

Both  the  finite  element  technique  and  the  integral  transform  analysis 
were  chosen  for  comparison  with  the  experimental  data  from  the  limestone  block; 
however,  the  integral  transform  approach  could  not  be  applied  directly  to  the 
case  of  an  isotropic  solid  as  the  solution  became  degenerate.  Consequently,  a 
small  degree  of  transverse  isotropy  was  introduced  by  the  Judicious  choice  of 
the  dynamic  elastic  constants  so  that  the  analytical  solution  could  virtually  be 
considered  as  the  response  of  on  isotropic  half-space  subjected  to  normal  point 
force  history  of  arbitrary  shape.  Accordingly,  the  dynamic  elastic  properties 
were  chosen  to  correspond  to  those  of  the  Bedford  limestone  block  used  in  the 
experiments  and  are  listed  in  Section  VI. 4.  The  experimental  input  pulse  was 
digitized  and  a  table  of  values  of  the  impulsive  force  on  the  free  surface  at 
each  time  step  was  obtained.  A  step  of  l/4  ysec  wa3  chosen  for  this  process  that 
was  considered  optimal  for  accurrcy  of  the  numerical  computations  and  the  computer 
time  required.  With  this  input  julse,  the  stress  histories  ond  arrival  times  were 
obtained  corresponding  to  those  measured  by  the  embedded  transducers.  In  Fig.  1 


of  th.  Bam  report  and  Pig.  11  reeulte  from  the  Integral  transform  solution  are 
superposed  on  the  experimental  stress  histories. 

The  finite  element  computer  pregram  was  devised  to  solve  a  similar  boundary 
value  problem.  However,  here  the  isotropic  and  anisotropic  media  could  be 
considered  independently.  Thus,  using  the  dynamic  elastic  properties  of 
limestone  cited  above  and  the  experimental  input  pulse  in  the  form  of  tabulated 
values  at  convenient  time  intervals,  the  stress  histories  and  wave  arrival  times 
corresponding  to  the  experimental  measurements  were  obtained.  These  finite 
element  predictions  are  superposed  on  the  previous  results  in  Fig.  1  of  the 
main  report  and  Figs.  10  to  12.  The  previously-stated  conclusion  that  the 
experimental  techniques  employed  provide  a  reliable  means  of  detecting  and 
recording  body  waves  inside  a  rock  is  thus  substantiated  by  the  satisfactory 
agreement  of  both  the  stress  levels  and  the  arrival  times. 

Comments  on  the  Wave  Propagation  Phenomena. 

Even  though  the  data  obtained  on  the  limestone  block  were  not  extensive, 
the  results  reveal  a  number  of  ideas  associated  with  the  theory  of  body  wave 
propagation  in  an  isotropic  half-space. 

(a)  p-Wavc  Velocity. 

The  wave  velocity  calculated  on  the  basis  of  the  first  signal  arrival 
corresponds  to  the  p-wave  speed  in  an  isotropic  medium  since  it  is  the  fastest  of 
the  two  possible  wave  speeds;  yielding  an  average  value  of  170,000  in/sec.  This 
compares  well  to  that  obtained  from  the  material  constants  used  in  the  theoretical 

solutions,  namely,  174,000  in/sec  and  the  corresponding  rod  wave  velocity  of 
141,400  in/sec(lU). 

(b)  Precursor  to  the  Main  Pulse. 

In  the  stress  history  depicted  in  Fig.  1  of  the  main  text,  the  precursor  to 
the  major  effect  of  the  pulse  also  corresponds  to  the  first  arrival  of  the  p-wave. 
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It  clearly  shows  a  shape  similar  to  that  predicted  by  theory.  The  second  peak  is 
mainly  the  effect  of  the  shear  wave.  A  comparison  of  the  arrival  times  of  the 
two  pulses  gives  a  reasonable  estimate  of  the  ratio  of  the  shear  wave  speed  to 
the  p-wave  speed  namely  about  O.65. 

(c)  Attenuation  of  the  Pulse. 

The  o^  stress  histories  shown  in  Figs.  11  and  12  indicate  the  degree  of 
attenuation  along  a  45°  ray  at  distances  of  2.83"  and  4.3"  from  the  impact  location. 
Both  the  theoretical  and  the  experimental  results  showed  that  the  attenuation  in  the 
tensile  stress  was  significantly  less  than  the  corresponding  attenuation  in  the 
compressive  stresses  which  appears  to  be  due  to  the  dispersion  of  the  pulse. 

The  peak  compressive  stress  in  the  x-direction  (0jn  in  Fig.  9)  decreased  as  r"1*5 
where  r  was  the  distance  of  the  observation  point  from  the  impact  location.  The 

peak  tensile  stress  in  the  same  direction  did  not  attenuate  according  to  the 
same  law. 

First  Passage  of  the  Pulse  and  Reflection^  from  the  Boundaries. 

The  first  passage  of  the  pulse  was  recorded  for  a  sufficient  length  of  time 
before  the  reflections  from  the  boundaries  distorted  the  data.  In  Fig.  1  of  the 
main  text  it  is  estimated  that  the  reflections  arrived  at  about  65  ^sec  after 
the  initiation  of  the  pulse  on  the  free  surface  which  means  that  the  theoretical 
solution  was  not  compared  with  the  experimental  stress  history  for  the  complete 
passage  of  the  first  pulse.  This  was  necessarily  so  in  the  case  of  the  finite 
element  method  because  of  the  finite  size  of  the  block  chosen  to  represent  the 
isotropic  half-space  as  well  as  the  computation  time  required  for  obtaining  the 
transient.  However,  the  integral  transform  solution  predicted  a  more  rapid  decay 
of  the  transient.  This  indicates  that  there  might  have  been  some  reflections 
at  the  rock/transducer  bar  interfaces. 


The  less  rapid  decay  of  the  measu  .ea  trMsient  indioat^  ^  Fossitie  ^ 

o  errors  in  the  measurements,  namely  the  scattering  of  the  wave  and  the 

additional  dispersion  of  the  pulse  due  to  the  presence  of  th  . 

P  ence  of  the  transducers.  Since 

e  Pulse  length  employed  for  the  input,  about  4o  „ec,  was  long  soared  to  the 
discontinuities  introduced  by  the  embedment  of  transducers,  it  was  ejected  that 

:7"T  "  S“ll!  "  ^  “  0rto  “  — —  -  -  one-dimens ional 

men  s  of  11.7.  Both  in  Fig.  1  of  the  main  text  and  Fig.  10,  the  large 

oscillations  Mediately  after  the  first  cycle  were  not  caused  by  reflections 

from  the  boundaries  of  the  bloc*,  the  first  arrival  of  which  is  indicated  in  the 

respective  figures.  The  theoretical  solution  by  the  finite  , 

oy  the  finite  element  method  does 

predict  such  oscillations  of  „+ 

lations  of  the  stress  even  though  the  integral  transfomn  method 

Predicts  a  more  rapid  decay.  The  reason  for  this  discrepancy  is  not  Mediately 

It  may  be  due  to  the  fact  that  the  integral  transform  analysis  assumed 
a  concentrated  load  while  the  actual  load  was  distributed  on  the  area  of  the  input 
crystal;  the  latter  type  of  loading  would  create  a  more  complicated  dispersion 
e  pulse,  it  is  noted  that  the  finite  element  method  invariably  assumes  some 
-earing  of  the  input  impulse,  m  any  case,  the  reflections  from  the  boundaries 
of  the  bloc*  arrived  before  the  measured  transient  decayed  co^letely. 

VI11*3  — dy  Wave  MeasurementS  in  the  Anisotropy  Mn^i 
Experimental  Results. 

The  information  obtained  from  the  experimental  results  was  similar  to  that 
described  in  VIII. 2.  The  size  of  the  block  and  the  length  of  the  input  pulse 
insured  the  observation  of  the  first  passage  of  the  pulse  for  sufficient  lengths 
of  time  at  various  locations.  The  experimental  data  with  P,  as  the  i^act 
location,  Fig.  15,  corresponding  to  observation  points  about  ,  to  *  inches  from 
the  impact  position  were  termed  far  field  response.  The  data  obtained  with 
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Pi>  P2,  p  P4  as  the  impact  locations,  Fig.  15,  from  the  transducers  which  were 
about  1.8  inches  and  3.4  inches  from  these  locations  were  chosen  to  represent 
the  near  field  response.  These  data  were  compared  with  corresponding  theoretical 
predictions  of  arrival  times  and  stress  histories. 

In  order  to  discern  the  information  obtained  experimentally,  the  stress 
histories  depicted  in  Figs.  29,  30  and  31  are  described  in  some  detail.  These 
three  transient  normal  stress  components  were  obtained  for  the  same  impact. 

The  input  pulse  was  also  recorded  simultaneously  as  shown  in  the  respective 
figures.  With  reference  to  Fig.  19,  transducer  detected  CTyy  and  with  reference 
to  Fig.  21,  transducer  Z^  detected  azz-  These  two  stress  histories  are  shown  in 
Fig.  30  and  Fig.  31  respectively.  In  view  of  the  symmetry  of  the  block  these 
two  records  give  the  stress  histories  at  the  same  location,  namely  (5",fe  As") 
corresponding  to  the  cylindrical  coordinate  system  shown  in  Fig.  l4.  Along  with 
these  two  stress  histories  a  axx  record  was  obtained  at  a  second  location, 

(5m}3j  as  shown  ^  Fig>  29.  The  corresponding  stress  transient  was  of  the 

shape  and  of  the  same  order  of  magnitude  as  the  a ^  stress  of  Fig.  30.  This  is 
another  indication  of  the  previously  mentioned  finding  that  the  new  set  of  dynamic 
elastic  constants  obtained  in  Section  VII  did  not  predict  significant  differences  in 
the  slowness  surface  from  the  corresponding  isotropic  case.  The  other  stress 
transients  described  in  Table  6  show  the  same  pattern  in  the  similarity  between  the 

Oyy  stress  at  (R,0^,Z)  and  stress  at  (R,&,,Z). 

Other  experimental  results  yielded  arrival  times  and  stress  histories  which 
were  not  all  compared  with  corresponding  theoretical  results.  However,  all  arrival 
times  obtained  were  utilized  to  determine  approximate  p-wave  speeds  in  various 
directions  and,  in  conjunction  with  similar  results  obtained  from  surface  wave 
investigation,  were  used  in  devising  a  procedure  for  estimating  the  dynamic  elastic 
stiffness  matrix  of  the  material  as  described  in  Section  VII.  In  particular,  the 


P-wave  speed  along  the  AES  .as  obtained  as  162,000  in/.ec  and  the  p-..v,  speed 
along  the  AES  determined  In  Ref.  (2)  was  obtained  as  171,000  In/seo.  This 
additional  evidence,  namely  the  lower  p-vave  speed  along  the  relocated  AES, 

Fig.  14,  reasonably  confirmed  its  actual  direction. 

The  mathematical  theory  of  propagation  of  elastic  waves  In  a  transversely 
Isotropic  medium,  with  the  particular  dynamic  elastic  constants  of  Yule  marble, 
predicts  that  the  p-wave  speed  along  the  AES  Is  the  lowest  while  that  normal  to 
the  AES  Is  the  highest.  An  average  value  obtained  for  the  latter  was  210,000 
ln/sec  which  was  computed  from  both  the  body  wave  and  the  surface  wave  measure¬ 
ments.  in  the  former,  a  ray  normal  to  the  free  surface  with  a  transducer  located 
In  line  with  the  Impact  position  was  utilised  whereas  In  the  latter  case,  a 
radial  stress  measurement  along  the  axis  of  foliation  plane  was  utilised.  The 
fact  that  such  data  as  well  as  those  along  the  AES  yield  the  exact  p-wave  speeds 
nas  ulso  been  used  In  Ref.  (9).  However,  since  the  present  experimental  Investigation 
utilised  a  more  reliable  method  of  determining  wave  arrival  times.  It  1,  believed 
that  the  previously  obtained  values  of  203,000  ln/sec  and  237,000  ln/sec^*  are 
too  high; compared  with  the  speeds  of  162,000  ln/sec  and  210,000  in/.ec  obtained 
in  the  present  work.  This  Is  attributed  to  the  possible  specific  experimental 
srror  In  Ref.  (9)  ..used  by  the  late  triggering  of  the  oscilloscope  by  the  output 
from  an  accelerometer  placed  near  the  impact  point  and  the  estimation  of  the  wave 
arrival  time  as  that  corresponding  to  the  length  of  trace  before  the  first  arrival 
of  the  wave  at  the  observation  point  as  recorded  on  the  oscillogram. 

(il)  Comparison  with  Theoretical  Results. 

(*)  Near  Field  Response. 

A  typical  comparison  of  the  near  field  response  with  the  corresponding 
theoretical  results  Is  depicted  In  Fig.  2  of  the  main  report,  which  show,  that 
the  stresses  obtained  by  the  Integral  transfom  analysis  were  . much  higher  than  the 
corresponding  measured  stresses  and  those  obtained  by  the  finite  element  method. 
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In  general,  the  finite  element  method  predicted  stress  histories  that  were  in 
closer  agreement  with  the  experimental  transients  than  the  integral  transform  analysis 
for  observation  points  which  were  in  such  close  proximity  to  the  impact  location. 

In  the  finite  element  method,  since  the  near  field  experimental  data  were  obtained 
by  using  a  l/U"  dia.  input  crystal,  the  input  force  was  approximated  as  a  uniformly 
distributed  impulse  over  a  circular  area  of  l/U  in.  diameter.  Hence,  it  appears 
that  poorer  agreement  obtained  with  the  integral  transform  method  was  due  to  the 
approximation  involved  in  assuming  that  the  response  of  the  block  was  effectively 
due  to  a  concentrated  time -dependent  load;  indicating  that  such  an  assumption 
is  valid  only  for  observation  points  which  are  located  at  relatively  larger 
distances  from  the  impact  position. 

Therefore,  it  was  considered  inappropriate  to  compare  the  experimental  data 
more  in  detail  with  the  corresponding  integral  transform  results  for  the  near  field 
response  of  the  block  and  such  a  comparison  was  made  only  for  the  far  field.  On  the 
other  hand,  a  meaningful  comparison  with  the  finite  element  method  results  could 
be  achieved  only  with  the  near  field  data  in  view  of  the  constraints  imposed 
regarding  the  size  of  the  block,  the  size  of  the  mesh,  the  time  interval  chosen  and 
the  computation  time  required.  Thus,  the  rest  of  the  comparison  of  the  near  field 
results  with  the  finite  element  method  is  depicted  in  Figs.  24  to  28.  In  Figs.  24 
to  26,  the  transducers  were  located  about  1.8"  from  the  impact  position  as  well 
as  in  Fig.  2  of  the  main  text  discussed  above.  In  figs.  27  and  28  the  transducers 
were  situated  in  a  ray  normal  to  the  free  surface  in  line  with,  and  at  a  distance 
of  3-3/8"  from  the  impact  location.  For  such  locations,  i.e.  for  observation 
points  vertically  below  the  normal  load  on  the  horizontal  free  surface,  the  finite 
element  method  solution  was  closer  in  agreement  with  the  experiment  in  the  case  of 
a  stress  component  normal  to  the  z-direction,  Fig.  28,  than  in  the  case  of  a 
stress  component  in  the  z-direction,  Fig,  27.  This  discrepancy  is  consistent 
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with  similar  disagreement  between  the  integral  transform  analysis  and  experimert 
discussed  below  in  relation  to  the  far  field  response  of  the  block. 

(b)  Far  Field  Response. 

The  comparison  of  the  exp*rimental  data  was  effected  only  with  the 
corresponding  integral  transform  results  as  depicted  in  Figs.  29  to  35 »  reasonable 
agreement  prevails  for  the  stress  levels.  However,  the  exact  shape  of  the  predicted 
transient  appears  to  be  susceptible  to  numerical  errors  especially  in  the  digiti¬ 
zation  of  the  experimentally-determined  input  pulse  and  subsequent  numerical 
differentiation.  In  most  cases,  the  input  pulse  was  somewhat  asymmetric  and  the 
disagreement  between  experiment  and  theory  appeared  to  be  more  marked  where  such 
asymmetry  was  more  pronounced.  The  actual  input  frequently  closely  resembled  the 
shape  of  a  single  sine-squared  pulse  with  a  duration  twice  that  of  the  rise  time; 
consequently,  such  a  boundary  condition  with  an  amplitude  equal  to  the  measured 
peak  force  was  also  used  in  the  stress  computation.  Another  alternative  used  for 
the  numerical  input  consisted  of  a  symmetrical  loading  with  the  rising  portion 
mirrored  about  the  peak  force.  A  comparison  of  a  number  of  stress  histories 
with  the  corresponding  theoretical  results  using  the  three  possible  input  shapes 
showed  that  except  for  some  improvement  in  isolated  cases  with  the  last  input 
pulse  shape,  there  was  little  difference  in  the  agreement  with  the  experimental 
results.  Hence,  the  actual  pulse  has  been  used  for  comparison  in  the  sequel. 

As  in  the  case  of  the  limestone  block,  the  analysis  predicted  a  more 
rapid  decay  of  the  pulse  than  was  observed.  Since  the  first  passage  of  the  pulse 
could  be  recorded  for  sufficient  lengths  of  time  without  distortion  due  to 
reflections  from  the  boundaries  of  the  block,  the  oscillations  observed  in  the 
transient  were  again  in  disagreement  with  the  integral  transform  predictions  as 
shown  in  Fig.  30.  In  Fig.  3  of  the  main  text,  a  comparison  of  the  far  field  response 
with  corresponding  predictions  of  both  the  theoretical  techniques  was  shown  to 
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illustrate  the  comparison  with  the  integral  transform  analysis  as  described  above 
as  well  as  the  inability  to  obtain  satisfactory  results  with  the  finite  element 
method  at  such  a  distant  observation  point  for  the  reasons  stated  in  VIII. 3  (ii)(a). 

The  comparison  of  the  experimental  results  with  the  integral  transform 
analysis  was  not  entirely  conclusive  regarding  the  accuracy  of  the  measurements, 
especially  those  involving  the  ozz  stress  history  as  shown  in  Fig.  34.  Here,  the 
second  peak  in  the  measured  transient  appears  to  be  due  to  the  reflection  of  the 
pulse  as  it  propagated  through  the  embedded  transducer  by  virtue  of  an  impedance 
mismatch.  Similar  anamoly  was  observed  in  the  comparison  of  the  azz  transient 
with  the  analysis  at  other  locations  such  as  shown  in  Fig.  35. 

VIII. 4  Surface  Wave  Propagation  Measurements  in  the  Anisotropic  Model. 

(i)  Experimental  Results. 

Since  the  transducers  were  approximately  5"  away  from  the  impact  location, 
the  measured  transients  could  again  be  compared  only  with  the  corresponding 
integral  transform  results.  A  total  of  6  complete  sets  of  data  were  obtained, 
each  set  consisting  of  the  radial  and  circumferential  stress  histories,  effectively 
at  the  same  location  relative  to  the  impact  location.  Out  of  the  7  pairs  of 
transducers,  stress  histories  were  recorded  with  6  pairs;  only  the  circumferential 

stress  history  was  recorded  at  location 

At  any  location  such  as  (R^jQj)}  Fig.  22,  the  radial  stress  transient 
distinctly  exhibits  the  p-wave  and  Rayleigh  wave  effects  as  shown  in  Fig.  4  of 
the  main  report.  The  shear  wave  effect  was  not  clearly  distinguishable.  The 
tangential  stress  histories  as  depicted  for  example  in  Fig.  37  did  not  record  the 
effect  of  the  p-wave.  The  tangential  stress  was  of  the  same  order  of  magnitude 
at  (Rq_,  6jj_)  811(1  but  was  negligibly  small  at  (R^,  6^)  (foliation  plane) . 

This  latter  effect  appears  to  be  due  to  the  absence  of  quasi -Rayleigh  effects  at 
a  location  such  as  (1^,9^),  the  quasi -Rayleigh  wave  being  one  which  exhibits  a 
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transverse  component  of  motion  in  the  plane  of  the  free  surface.  Such  a  component 
seems  to  exist  up  to  15°  from  the  direction  of  the  foliation  plane.  Ihese  stress 
histories  were  obtained  at  about  1/16"  below  the  free  surface  and  even  if  the 
attenuation  of  the  Rayleigh  wave  were  large,  these  stress  components  may  be 
considered  as  representative  of  the  surface  wave  effects. 

(ii)  Comparison  with  Theoretical  Results. 

The  experimental  results  were  compared  with  corresponding  theoretical 
predictions  of  the  integral  transform  method  as  shown  in  Pig.  k  of  the  main 
report  and  Figs.  36  and  37.  The  first  two  diagrams  show  the  comparison  of  two 
typical  radial  stress  histories  while  the  third  shows  the  comparison  of  a 
tangential  stress  history.  The  good  agreement  indicates  that  the  theoretical 
model  agrees  remarkably  well  with  experiment.  However,  the  integral  transform 
method  did  not  predict  the  diminution  of  the  transverse  effect  due  to  the 
Rayleigh  wave  as  the  direction  approaches  the  direction  of  the  foliation  plane. 

It  is  not  clear  whether  the  failure  of  the  analysis  to  predict  such  a  phenomenon 
was  due  to  numerical  errors  and  also  whether  the  observed  absence  of  the  quasi- 
Rayleigh  waves  may  have  been  due  to  experimental  vagaries.  This  discrepancy 
was  left  unresolved  and  is  not  shown  in  the  figures. 

VI11*5  P.etermination  of  Dynamic  Elastic  Constants  from  Body  Wave  and  Surface 
Wave  Measurements. 

The  values  determined  in  Section  VII  lie  between  those  obtained  previously 
(Table  4,  Appendix  D).  Thus,  it  appears  that  such  a  method  may  be  applied 
in  general  to  other  rock  materials.  The  actual  values  may  be  improved  by  adding 
other  refinements  to  the  technique  such  as  weighing  the  various  data  obtained 
experimentally  and  a  more  general  program  may  be  written.  Some  other  features  could 
be  built  into  the  program  such  as  automatically  reverting  from  one  function  to 


square  methods  may  be  used 


another,  and  approximation  procedures  other  than  least 

ifcr  part  or  all  of  the  functions  which  may  be  also  changed  as  required  as  the 
minimization  progresses. 

It  is  noted  that  it  is  possible  to  obtain  the  dynamic  elastic  stiffness 
constants  c^,  c^>  and  c^  from  the  phase  velocity  equation  cited  in 
Section  VII  directly  using  the  approximate  p-vave  speeds  obtained  for  a  number  of 
directions.  Such  a  procedure  was  adopted  in  Ref.  (9).  However,  the  fifth  constant 
c12  cannot  be  obtained  by  using  p-wave  tests^7.  The  same  procedure  failed  to 
give  satisfactory  results  in  the  course  of  the  present  investigation  and  hence 
the  method  of  Section  VII  was  devised. 

VIII*6  Stress  Wave  Measurements  with  Embedded  Transducers. 

The  results  show  that  the  PZT  ceramic  crystal  transducers  are  suitable  for 
detecting  and  recording  body  wave  pulse  propagation  in  rocks.  The  choice  of 
magnesium  as  the  material  for  the  transducer  bar  was  originally  made  on  the  basis 
of  average  value  of  the  acoustic  impedance  of  Yule  marble.  However,  it  appears 
that  the  anisotropy  of  the  Yule  marble  block  employed  was  such  that  the  use  of 
another  material  such  as  aluminum  would  have  been  more  appropriate  in  some  directions 
such  as  the  z-axis  in  Fig.  1^.  The  embedding  technique  was  quite  effective  even 
if  there  is  some  uncertainty  about  entrapped  air  bubbles  between  the  transducer  bar 
and  the  rock.  To  achieve  intimate  contact  between  the  crystal  unit  and  the  rock 
and  m  order  that  the  calibration  should  apply  and  that  the  same  calibration  may 
be  used  for  all  transducers  to  obtain  internal  stress  uniformity  of  embedment  is 
required,  with  crystal  assembly  unit  completely  embedded  in  the  rock  with  an  epoxy 
and  aluminum  oxide  mixture  surrounding  the  unit. 

The  voltage  amplification  was  employed  for  recording  the  embedded  transducer 
response  since  the  initial  testing  of  the  PZT  crystals  by  this  method  in  a  split 
"k  ns  on  tar  gave  good  correspondence  of  the  pulse  shapes  between  the  crystal 
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and  the  strain  gage  records.  The  general  techniques  of  the  experimental  measurements 
provided  a  reliable  means  of  detecting  and  recording  waves  in  the  interior  and  near 
the  surface  of  the  rock. 
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Notes:  ( i )  Air  gap  is  neglected 

(ii )  For  same  C,  <j,  K  =  ^*d 

if  force  is  distributed  uniformly 

(iii)  Since  transducer  construction  is  not  ideal 
K  varies  with  individual  transducer 

(iv)  K  is  determined  by  external  calibration  in 
split  Hopkinson  bar 
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DETERMINATION  OF  STATIC  AND  DYNAMIC  MECHANICAL 
PROPERTIES  OF  YULE  MARBLE 

It  Introduction 

The  application  of  any  scientific  or  technological  procedure  to  a  material 

requires  a  precise  knowledge  of  its  response  to  both  static  and  dynamic  loading, 

whether  for  the  purpose  of  understanding  the  phenomenological  processes  produced 

as  the  result  of  the  application  of  forces,  whether  for  the  purpose  of  predicting 

events,  or  whether  for  the  purpose  of  design  and  construction.  In  the  case  of 

rock,  such  information  is  vital  in  the  areas  of  drilling  and  excavation,  the  analysis 

of  foundations  for  the  support  of  surface  structures,  and  geophysical  prospecting, 

to  mention  but  a  few.  Large  quantities  of  mechanical  data  have  been  collected 

about  a  variety  of  rocks  in  the  past,  but,  to  the  author's  knowledge,  there  has 

not  been  a  concentration  of  tests  on  a  single  material  by  one  investigator  for 

the  purpose  of  ascertaining  the  strength  characteristics  of  this  substance  by  a 

variety  of  techniques.  This  portion  of  the  report  details  such  efforts  as  applied 

to  Colorado  Yule  marble,  the  material  employed  in  the  parallel  theoretical  and 

experimental  investigations  concerning  wave  propagation  produced  by  surface  impact 

on  large  blocks  of  this  material  that  simulate  a  half-space. 

Yule  marble  was  chosen  as  the  test  material  for  a  variety  of  reasons:  (a)  The 

rock  has  been  the  subject  of  extensive  previous  geological  and  petrographic  examina- 

(l) (2) (3)* 

tions  >  including  the  effects  of  strain  rate  at  high  temperatures  and 

confining  pressures^  and  the  nature  of  fabric  changes  under  large  hydrostatic 
pressures^  (b)  The  fabric  is  macroscopically  homogeneous  (with  respect  to 

wave  lengths  of  interest)  and  nearly  transversely  isotropic  with  a  well-defined 
crystal  structure^  '  and  it  can  be  secured  in  large  sample  sizes  without  faults 

* 

Numbers  in  superiors  indicate  References  listed  at  the  end  of  the  text. 


or  cracks.  Thus,  It  is  an  ideal  substance  to  be  experimentally  employed  for  the 
verification  of  wave  propagation  analyses  utilizing  transverse  isotropy;  and 
(c)  Previous(9)(1°)  and  concurrent  surface  and  body  wave  studies  were  executed 
with  the  aid  of  two  24"  x  24"  x  10"  blocks  of  this  material  furnished  by  the 
U.  S.  Bureau  of  Mines,  Minneapolis.  The  Investigations  of  Kefs.  (9)  (i0) 

required  the  determination  of  some  of  the  properties  of  the  marble;  however, 
dome  anomalies  were  observed  that  the  present  more  detailed  examination  resolved. 

It  should  be  mentioned  that  all  the  previous  dynamic  testa  with  the 
exception  of  the  measurement  of  transit  times  of  one  of  the  two  blocks  (which 
were  eventually  utilized  for  the  calculation  of  the  elastic  constants  of  the 
material)  were  performed  on  randomly  obtained  specimens.  The  samples  utilized 
in  the  present  investigation  were  all  derived  from  a  5'  x  2'  x  lj"  slab  obtained 
from  the  Clervi  Marble  Company  of  San  Francisco,  California.  Differences  in  the 
data  cited  here  and  that  obtained  from  other  previous  and  concurrent  tests  may 
thus,  at  least  in  part,  be  attributable  to  natural  differences  in  composition 
and/or  structure  of  the  raw  material  (since  no  quality  control  could  be  exercised). 

Ibe  general  objectives  of  the  present  investigation  consisted  of  the  deter¬ 
mination  of  the  axis  of  symmetry  and  the  mechanical  properties  of  the  marble,  includin, 
fracture  properties,  as  a  function  of  strain  rate;  the  effects  of  tem-erature, 
confining  pressure,  porosity,  water  content  and  similar  parameters  were  not 
considered.  Specifically,  the  location  of  the  axis  of  transverse  isotropy  of  the 
slab  was  obtained  by  crystallographic  techniques ;  the  five  constants  characterizing 
a  transversely  isotropic  elastic  material  were  obtained  in  tension  and  compression 
and  under  static  and  dynamic  loading;  the  influence  of  strain  rate  and  specimen 
orientation  on  the  modulus  and  unconfined  strength  of  tensile  and  compressive 
specimens  was  examined;  and  the  nonlinear  and/or  anelastic  behavior  of  the  rock  was 
characterized.  Standard  testing  equipment  was  employed  to  secure  the  quasi-static 
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mechanical  properties,  while  Hopkinson  and  split  Hopkinson-bar  procedures  (cf.  11,  12) 
were  utilized  to  derive  the  corresponding  dynamic  information.  A  considerable- 
amount  of  developmental  work  was  required  to  select  specimen  shapes  that  permitted 
fabrication  without  brittle  failure  occurring  during  the  manufacturing  process.  In 
many  cases,  the  test  technique  was  verified  by  the  use  of  aluminum  specimens  whose 
known  properties  could  be  checked  against  experimental  results. 

11 •  Physical  and  Geometrical  Characteristics. 

Yule  marble  has  been  described  by  Thill(3)  as  a  pure  calcite  marble  with 
specific  gravity  of  about  2.70  and  grain  sizes  ranging  from  0.3  mm  to  0.5  mm 
with  an  average  of  0.4  mm  for  the  spherical  specimen  examined  ultrasonically. 

Knopf (6)  observed  a  porosity  of  about  0.15  percent  and  called  the  crystalline 
calcite  grains  to  be  medium-sized  ellipsoidal  grains  whose  short  axes  are  oriented 
predominantly  noraal  to  the  marble  -grain".  It  has  been  shown(6)(8)  that  Yule 
marble  displays  a  distinct  pattern  of  preferred  orientation  of  calcite  optic 
axes.  A  1000-point -count  modal  analysis  indicated  that  the  marble  comprised  about 
99  percent  calcite  and  1  percent  accessory  minerals,  notably  biotite,  epidote, 
magnetite  and  muscovite  by  volume. 

The  present  5'  x  2'  x  l£"  test  slab  exhibited  bedding  planes  as  evidenced  by 
the  presence  of  grey  bands  of  opaque  mineral  throughout  the  specimen.  Although 
not  totally  unifonn,  the  average  normal  to  these  planes  is  relatively  constant  and 
is  located  in  the  largest  plane  of  the  slab;  this  will  be  termed  the  Z-direction. 

The  specific  gravity  of  the  material  was  found  to  be  2.8l  with  crystal  sizes 
ranging  from  0.2  mm  to  0.7  mm  and  a  mean  of  0.5  mm.  All  test  samples  were  cut 
from  this  slab  and  are  identified  by  two  letters  followed  by  a  single  or  two-digit 
number.  The  first  letter  shows  the  general  coring  location  as  indicated  in  Fig.  1, 
the  second  denotes  the  direction  of  coring  for  the  sample,  while  the  numbers  identify 
a  more  initial  position  of  the  specimen  in  the  slab. 


The  Initial  ossimptlen  of  coincidence  of  the  axis  of  trarsverse  l  oot  rosy 
with  the  Z-lxls,  the  averse  normal  to  the  bedding  plane*  vas  verified  b>  preparing 
o  thin  eection  cut  firm  the  alab  (n«.  1)  pespendlc alar  to  the  t-dlreetien  end 
examining  the  orientation  of  each  of  100  calclte  crystals  of  the  specimen.  ?hie 
wee  accomplished  by  recording  the  inclination  of  the  universal  stage  incorporated 
in  the  crystallog  raphlc  microscope  thet  vw  required  to  produce  the  interference 
pattern  of  a  cryetal  vbos*  optical  axle  le  perpendicular  to  a  fixed  direction^1*). 

Oily  thoee  crystals  vith  opt.  '  axle  angle*  Uei  than  *>c  vith  the  bedding  normal 
could  be  detected  due  to  instrument  limitations;  however,  91  percent  of  the 
crystals  were  located  vithir.  the  observation  region.  Conalderalicn  of  the  visible 
domain,  represents  by  that  portion  of  the  surface  cf  a  hemisphere  enclosed  by 
50  cone  vith  the  apex  at  the  origin,  indicates  that  the  ratio  of  this  area  to 
that  of  the  hemisphere  is  about  0.30.  Consequently,  a  purely  random  crystal 
orientation  such  as  found  in  the  case  of  an  isotropic  material  would  Indicate  that 
70  percent  of  the  obsenrS  crystals  (rather  than  9  per-ert  as  found  here)  should  be 
outside  the  zone  of  possible  crystallographic  expiration.  The  highly  ani  otroplc 
nature  of  this  material  is  thus  established. 

location  of  the  crystal  axes  vas  found  to  be  quite  cylindrically  */**trle 
vith  respect  to  the  Z-axls,  the  initial  assumption  cocx-eralng  the  coincidence  of  the 
bedding  plane  normal  vith  the  axis  of  transverse  leotfopy  appeared  to  be  substantiate i. 
This  conclusion  is  based  on  the  hypothesis  that  the  '.strlbutlon  of  optical  properties 
is  directly  correlative  vith  the  orientation  of  **crt»eo*le  amcbanlcal  properties 
and  that  other  rock  characteristics,  such  as,  for  example,  the  orientation  of 
cracks  either  also  confirms  this  result  or  else  is  an  rffe  -  tf  ir^  order.  This 
trend  is  strongly  supported  by  evidence  tnat  vel  lty  ar.lsotrrpies  obtained  by 
ultrasonic  sNmsuremtr.*  tecimiques  on  Tule  marble  coincide  vith  crystallographic 
anisotropies  corresponding  to  n  t-arsversely  isotr^ic  *aterUl(J). 


III.  Quasi-Static  Tecta. 


a)  Compression. 

Ten  uniaxial  compressive  test  specimens  with  a  diameter  of  1.05  in.  were  cored 
in  each  of  ths  three  principal  direction!  using  an  oil-cooled  diamond  bit  counted 
on  a  specially  converted  milling  machine.  Nominal  length!  of  the  samples  were  2  in. 
for  the  Y-  and  Z-dlrections,  while  the  slab  thicknen  limited  that  in  the  X-dlrection 
to  l£  in.  The  speciaens  were  ground  flat  with  an  abrasive  diamond  wheel  with  a 
maximum  difference  of  0.0015  in.  in  the  dimensions  of  the  axis  and  two  generators 
90  apart.  In  spite  of  extreme  care  in  the  fabrication  process,  there  is  a  possi¬ 
bility  of  the  disturbance  of  the  fabric  relative  to  its  virgin  state,  although 
it  is  expected  that  any  such  damage  will  have  only  secondary  effects  on  the 
mechanical  response  of  the  samples. 

BLH  FAE-12-12S9L  epoxy-backed  strain  gages  with  a  length  of  1/8",  a  resistance 
of  120  ohms  and  a  gage  factor  of  2.01  were  mounted  longitudinally  with  EPY-150 
epoxy  at  the  two  ends  of  the  midsection  diameter  of  each  specimen;  for  the  G-serlcs 
of  samples  (cored  noraal  to  the  X-direction),  a  pair  of  transverse  gages  were 
additionally  mounted  in  a  similar  manner  near  the  specimen  center.  All  gages 
were  wired  in  series  to  eliminate  any  flexural  components  and  were  incorporated  in 
an  AC-excited  bridge  circuit;  they  were  calibrited  with  the  aid  of  shunting  a 
known  resistance  across  each  gage  pair.  The  compressive  force  applied  through 
bearing  plates  by  means  of  a  0-20,000  lb.  capacity  Instron  testing  machine  was 
determined  by  a  calibrated  load  cell.  Both  a  variable  time  base  strip  chart 
recorder  and  a  dual-trace  oscilloscope  were  employed  to  record  the  strain  and  load 
histories.  The  arrangement  was  checked  out  by  the  determination  cf  the  Known  elastic 
constants  for  a  7075  aluminum  test  specimen. 

Two  specimens  from  each  direction  w.*re  tested  to  fracture  at  each  of  five 

-6  -2 

strain  rates  ranging  fma  «  ■  10  to  10”  per  second,  ylelllng  the  results  shown 
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in  Fig..  2,  3.  «<  U  for  th,  highest  and  rate  ln  each  ^ 

ef‘<Ct*  *"  ““ll  °r  "'6ll8lb1'  *“  ■»  curve,  characteristically 

exhibit  three  region.:  an  initial  concave  upward  shape  with  an  original  tangent 

hodulu.  E,  up  to  about  one-third  of  th.  failure  stress,  followed  by  a  linear 

region  with  slop,  t,  in  th.  sriddle  third  of  the  stress  range,  followed  by  a 

concave-downward  portion  up  to  aaaln*.  .tree.  ^  which  is  always  larger  than 

fuilur,  stress  of.  Th.  average  value.  for  each  of  th.  three  direction.  X,  ,, 

*  **r«  5.6,  6.6  snd  2.6  x  lo6  p„l  for  Ep  ai  6.9,  8.1  and  5.6  x  106  psi  for 

E2  -.r  th.  entire  ,uasi-.t.tlc  range;  there  was  f.r  l...  variation  between 

speclnens  for  the  linear  nodulua  23  than  for  E„  where  error,  in  its  detection 

urre  estinated  at  20  percent,  th.  ext  renal  value,  for  the  latter  oocurring 

in  the  X-direction  at  a  rat,  of  0.9  x  10‘2  per  second  hunting  to  6.9  and 

M  *  10  r'*P'CUV'ly-  f0r  th'  «PC=l»cn».  The  strain  rate,  quoted 

vere  assuaed  to  be  unifora  up  to  the  value  of  (?/i\  .  .  .. 

up  o  value  of  (2/3)aB,  but  their  values  at  fracture 

.«ti«.  were  considerably  greater  than  this  average. 

in  th.  region  near  fracture,  stmin  recorded  by  the  gage.  no  longer  1.  an 
accurate  «**ur».nt  of  avenge  cross-section  !  specimen  strain-,.  Alno.t  vithout 
exception,  fracture  path,  initiate  at  th.  comers  of  th.  specie  and  travel 
diagonally  through  along  one  failure  plan,,  in  th.  X  and  ,  directions,  these 
planes  were  invariably  oriented  such  that  their  nomal  lay  i„  the  plane  defined 
by  th.  axis  of  th.  cylinder  and  a  point  lying  in  the  Z-dlrection.  gage,  counted 
auch  that  this  plan,  of  failure  traveled  through  then  produced  larger  strain 
readings  than  those  located  away  fms  the  fracture  path.  This  conclrurion  was 

reached  after  nounting  four  gages  at  90°  Intervals  at  the  nldscction  of  both  Y- 

*hd  Z -direction  speclncns  and  conparlng  th.  stress-strain  curves  derived  from  th. 
tvo  orthogonal  gag,  pairs  ..  ,houn  m  „g.  0>gei  on  tpcctaen5  in  ^ 

vere  unintentionally  located  .0  that  they  were  as  far  as  possible  froo  the  fracture 


Path  while  those  on  specimens  in  the  Y-direction  were  posit!  * 

10n  were  positioned  such  that  the 
racture  path  always  passed  through  the  gages  Thus 

5  ne  gages.  Thus,  the  apparent  difference 
in  material  properties  near  failure  -  v  a*  .  . 

while  Y-directlon  s  1  ’  "ilre0tlt>"  appearing  brittle, 

irectlon  samples  exhibiting  a  region  of  large  strains  ana  , 
is  eimio*  j  v  8  strains  and  low  modulus  -- 

e^la  „ed  by  the  difference  in  gage  location  with  respect  to  failnre  planes 
all  lndlCateS  h°V  ^  ^  “  -  -  -  the 

assumption  of  one-dimensionallty  breaks  dora  in  the  prefailure  region 

Specimens  in  the  Z-directlon  show  no  preference  in  f™  * 

although  they  also  split  diagonally,  sometimes  '  ""  ^  °ri'ntlti0n- 

,  .  sometimes  accompanied  by  secondary  cracks 

IT"  ^  ^  ^  ^  -  —  —  *.  the  cylinder!!  L 

our-gage  test,  there  was  very  little  difference  in  strain  between  the  two  sets 

T  TW  the  —  one  set  of  Reducer, 

maximum  stress  in  the  X-direction  warded  frc„  about  8340  to  9k00  psi  0y.r 

strain-rate  range  of  about  to  8  x  10*3  with  maxim™  strains  ranging 
from  982  to  1300  x  in-  +>,»  „  8  8 

to  9300  psi  ft  ™lues  «»  Y-dlrection  were  7600 

9300  psi  f0r  strains  of  about  3300  to  2100  x  in"6  * 

of  O  .  10  350  to  18  non  V<aUet  f0r  th* 

m  ,350  to  16,500  psi  at  strains  of  3070  to  4750  x  10"6 

isotropy,  and  more  sharply  with  this  p  t  ^  the  Pl“e  °f 

T  t  parameter  along  the  axis  of  transverse  isotrnnv 

In  most  rases  the  fracture  c+v.  sot ropy. 

it  „  SS  VaS  SOmeWhat  lower  than  the  failure  stress  but 

r  •  ••  ““  - . .  .. 

„  *•  ...... 


Stx  =  I  (,Jxx-'«yy)-  £r  Czz 

Vy  =  e  ( V^xx*-  r  °zz 

'2Z  =  ■  “  (oxx*0yy)+  F  °zz 


Vi  ”  v/2G' 

Vs  -  V20’ 

t  =  2sl  =  (i+u)  „ 

xy  2G  E  °xy 


(P-1) 
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contain  five  elastic  constants:  E,  |±  and  E',  n'  denote  Young's  modulus  and 
Poisson's  ratio  in  the  plane  of  isotropy  X-Y  and  parallel  to  the  axis  of  transverse 
isotropy,  Z,  respectively.  The  fifth  constant  G’.  is  the  shear  modulus  in  any  plane 
perpendicular  to  the  plane  of  isotropy.  Four  elastic  constants  can  be  obtained  with 
the  aid  of  Eqs.  (D-l)  by  measuring  axial  load  and  longitudinal  and  transverse 
strain  in  uniaxial  specimens  oriented  parallel  to  the  Y  and  Z-axes,  while  G'  can 
be  determined  from  values  of  these  quantities  in  a  specimen  cut  parallel  to  a 
line  45°  counterclockwise  from  the  Z-axis  in  the  X-Y  plane.  Transformation  of 
both  stress  and  strain  tensors  yield  the  relation 


G' 


(a-2) 


where  subscripts  L  and  T  refer  to  longitudinal  and  transverse  strain,  respectively, 
and  45°  refers  to  the  specimen  orientation. 

These  constants  were  evaluated  from  specimens  1.05"  x  2"  long  cut  along  the 
Y,  Z  and  45  directions  as  indicated  by  the  G-series  in  Fig.  1.  The  samples  were 
first  loaded  from  0  to  1200  psi  and  then  unloaded  at  about  100  psi/sec  for  seven 
cycles  in  the  Instron  machine  and  then  loaded  and  unloaded  to  6000  psi  at  a  rate 
of  about  300  psi/sec  for  three  additional  cycles.  Typical  results  are  shown  in 
Fig.  6  ,  7  ,  and  8  .  The  material  exhibits  a  "first  cycle"  effect  as  shown  in 
Fig.  8  :  a  permanent  deformation  accompanies  each  virgin  stress  level,  but  upon 
subsequent  loading  to  this  level,  there  is  hysteresis,  but  no  appreciable  pennanent 
set.  The  ratio  of  transverse  to  longitudinal  strain  was  found  to  be  non-linear 
(or  perhaps  bilinear)  for  both  Y-  and  Z-dirsction  specimen.  In  order  to  avoid  the 
problems  of  non-linearity  and  first  cycle  variations,  the  elastic  constants  were 
determined  from  the  seventh  0-1200  psi  loading  cycle  as 


4.7  x  10b  psi;  ^  =  0.13;  E^ 


2.3  x  10  psi;  ^  =  0.05;  =  1.4  x  106  psi 


b)  Tensile  Tests 


After  two  initially-selected  specimen  geometries  proved  to  be  unsatisfactory, 
0.768-in.  diameter  rods  were  cored  from  the  Y,  Z  and  45°  directions  with  the  aid 
of  a  converted  water-cooled  gravity  drill  press  and  cut  to  lengths  of  approximately 
5-3/4  in.  by  a  diamond  saw.  Two  3/4-in.  diameter  x  l|  in.  threaded  aluminum 
endcaps  were  glued  flat  to  the  specimens  with  Scotchweld  Structural  Adhesive 

and  wrapped  with  transparent  tape  so  that  their  diameter  approached  that  of  the 
rock  cores. 

In  order  to  estimate  the  magnitude  of  the  bending  stresses  that  are  invariably 
extant  to  some  extent  in  any  tensile  specimen  during  testing,  three  gages  were 
mounted  at  120°  intervals  around  the  midsection  of  a  sample  yielding  readings  of 

V  *2  “d  e3*  A  Simple  “>alysis(ll°  shows  that  the  pure  tensile  strain  v  the 
angle  between  the  neutral  axis  and  the  gage  reading  ^  namely  ^  and  the  peak 
bending  stress  are  given  by 


"  °t/E  =  |  *i+e2+c3^  »  tan  0_ 


*/3[Gi-St] 

2c2+ei"3®t 


(d-3) 

°b  sin  0q  E 

With  a  valua  of  E  =  7  x  106  psi,  the  ratio  of  the  outer  fiber  bending  stress  to 

average  tensile  stress  was  about  15  percent  for  a  specimen  loaded  about  two-thirds 
to  fracture. 

Four  specimens  each  from  the  Y-  and  Z-directions,  supplied  with  two  diametrically 
opposed  strain  gages  at  the  rock  midsection  were  loaded  to  fracture  at  various 
strain  rates  with  results  as  shown  in  Figs.  9  and  10;  all  of  the  Y-direction  samples 
broke  at  the  glue  joint,  whereas  two  of  the  four  Z-direction  specimens  broke  near 
the  gages.  The  data  presented  mre  most  likely  in  error  since  (a)  the  measured 
strain  is  probably  smaller  than  that  at  the  interface  where  failure  generally 
occurred,  (b)  the  fracture  stress  is  underestimated  since  a  stress  concentration 
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apparently  exists  at  the  interface,  and  (c)  the  apparent  increase  in  fracture 
stress  with  strain  rate  may  be  partly  due  to  the  property  of  the  glue  rather 
than  that  of  the  rock. 

In  order  to  overcome  these  deficiencies,  an  initial  attempt  was  made  to 
produce  a  special  contour  previously  employed  for  fracture  investigations  of  bone^1^ 
that  had  been  photoelastically  and  analytically  shown  to  yield  a  nearly  uniform 
stress  distribution  across  the  section^,  but  the  production  of  the  geometry 
proved  to  be  very  time-consuming  and,  further,  most  often  resulted  in  specimen 
failure  during  fabrication.  A  contoured  specimen  geometry  was  then  machined  from 
a  3/4- in.  diameter  cylinder  with  a  length  of  2-7/16",  consisting  of  a  central 
15/16"  long  reduced  section  exhibiting  a  uniform  3/8"  long  region  with  a  diameter 
of  |  in.  where  a  pair  of  gages  was  attached,  and  end  fillets  of  £-in.  radius 
that  did  not  break  in  the  manufacturing  process.  Contouring  by  means  of  sandpaper 
applied  to  a  rotating  workpiece  yielded  an  ellipsoidal  section  exhibiting  a 
distinct  "grain"  and  requiring  the  use  of  a  powertool  to  fabricate  a  cylindrical 
test  specimen.  It  was  subsequently  determined  analytically  that  a  3/4-in.  radius 
fillet  would  have  been  more  satisfactory  by  significantly  reducing  stress  concen¬ 
trations  in  the  region  of  the  section  change. 

Table  1  presents  the  results  of  the  quasi-static  tensile  tests  both  for  the 

3/4-in.  diameter  by  6"  long  and  special  contour  specimens,  including  two  special 

samples  represented  by  the  last  two  entries  that  were  examined  at  comparable  strain 

rates  to  provide  a  direct  comparison  of  the  effect  of  a  change  in  the  test  section 

geometry  on  mechanical  properties.  Here  a  much  lower  total  fracture  strain  was 

noted  for  the  contoured  specimens,  although  the  maximum  stress  a  for  the  two  cases 

m 

agreed  closely.  The  gages  were  found  to  be  located  at  the  maximum  possible 
distance  from  the  fracture  path  and  thus  yield  different  results  as  explained  in 
conjunction  with  Fig.  5.  Fig.  11  shows  the  stress -strain  curves  for  three  contoured 
Z-direction  samples.  While  there  appears  to  be  an  increase  with  strain  rate  of 
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initial  modulus  E1  for  the  Y-direction,  this  does  not  appear  to  be  the  case  along 
the  axis  of  transverse  isotropy. 

IV.  Creep  Tests. 

Creep  tests  were  performed  on  both  tensile  and  compressive  specimens  in 
order  to  determine  the  approximate  stress  levels  where  viscoelastic  effects  begin 
to  dominate  the  material  behavior.  Instrumented  compression  specimens  fabricated 
as  described  previously  were  loaded  in  approximately  700  psi  increments  at  a  rate 
of  700  psi/sec  by  an  MTS  testing  machine  in  the  constant  load  mode.  Each  level 
was  maintained  for  100  sec,  after  which  the  next  load  increment  was  applied;  the 
strain  gage  output  was  continuously  monitored.  The  results  are  shown  in  Figs.  12 
and  13  for  the  Y-  and  Z-directions,  respectively.  An  additional  creep  test  on  a 
Z-direction  sample  involving  a  load  of  3600  psi  applied  for  15  minutes  yielded 
less  than  20  p  in/in  of  creep  strain.  It  is  evident  from  these  data  that  there 
is  no  significant  creep  except  in  the  vicinity  of  failure  which  appears  to  be 
brought  about  by  this  flow. 

Rock  specimens  equipped  with  aluminum  endcaps  as  employed  in  the  quasi-static 
tensile  tests  were  rapidly  loaded  to  a  constant  stress  level  of  up  to  230  psi  by 
the  attachment  of  weights  to  the  lower  loading  chain  of  the  Instron  machine.  The 
constant  strain  response  for  loads  applied  up  to  10  minutes  indicated  the  absence 
of  noticeable  viscoelastic  effects  in  this  range.  Employment  of  higher  stress  levels 
required  the  use  of  the  Instron  machine  in  a  constant  load  capacity;  however,  this 
mode  of  operation  limited  loading  rates  to  about  30  psi/sec  so  that  only  the  last 
part  of  the  creep  curves  were  obtained.  Here,  too,  with  stress  levels  up  to  650  psi, 
no  significant  viscoelastic  behavior  was  observed  either  in  the  Y-  or  Z-direction. 
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V.  Dynamic  Tests. 

a)  Hopkinson-Bar  Experiments. 

One  Y-  and  one  Z-direction  Hopkinson  bar,  samples  JZ  and  IY,  respectively, 
were  fabricated  by  gluing  together  three  appropriately  oriented  3/4-in.  diameter 
rods  6"  long,  similar  to  those  employed  in  the  tension  tests,  and  were  supplied 
with  two  sets  of  diametrically  opposed  longitudinal  gages  mounted  on  the  central 
section  about  4-13/l6"  apart  as  well  as  with  one  transverse  pair  immediately 
adjacent  to  the  farthest  longitudinal  transducer  set.  Another  specimen,  m45, 
but  5-3/4  long  was  cored  at  45  in  the  Y-Z  plane  with  identical  bedding  to  PY 
and  instrumented  with  a  single  pair  of  longitudinal  and  transverse  gages,  the 
former  being  located  2-5/l6"  from  the  rock  impact  end.  All  specimens  were  pre¬ 
faced  by  3/4-in.  diameter  x  aluminum  end  caps  attached  with  wax  to  prevent 
local  fracturing.  They  were  held  vertically  in  an  arrangement  permitting  loading 
by  the  inpact  of  a  £-in.  diameter  steel  ball  dropped  from  a  height  of  22j  in. 
through  an  aligning  tube  onto  the  aluminum  cap.  The  strain  pulses  detected  by 
the  gages  were  recorded  simultaneously  by  a  565  dual-beam  Tektronix  oscilloscope 
whose  amplifier  had  a  bandpass  flat  to  3  megahertz  using  a  potentiometric  circuit 
that  permitted  gage  calibration  by  observation  of  the  effect  of  inclusion  of 
known  shunt  resistors  in  the  loop.  Triggering  of  the  device  was  achieved  from 
the  signal  generated  by  a  piezoelectric  crystal  taped  to  the  side  of  the  specimen. 

Peak  arrival  times  were  used  to  calculate  both  rod  wave  velocities  c  and  the 

o 

ratio  of  transverse  to  longitudinal  strains  for  both  compressive  and  tensile 
pulses,  the  latter  being  generated  by  reflection  at  the  distal  bar  end.  Wave 
speed  determination  for  specimen  m45  required  the  use  of  both  incident  and 
reflected  pulses. 

A  uniaxial  elastic  analysis  without  correction  factors  was  employed  to  evaluate 
the  dynamic  elastic  constants.  Since  minimum  pulse  lengths  of  6  inches  prevailed 

throughout  the  tests,  yielding  a  bar  radius  to  wavelength  of  about  0,06,  geometric 
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( 17  \ 

dispersion  will  be  minimal  '  and  this  theory  should  accurately  describe  the 
phenomenon.  This  was  substantiated  by  the  virtual  congruence  of  the  strain  pulses 
at  the  two  gage  stations.  Again  assuming  transverse  isotropy,  the  constants 
were  determined  from  the  relations 


E,  = 


P  c. 


Ed 


=  P 


G'  = 


e45o(c  /p)‘ 
L  4 ) 


2cc45c  - 


'Its?- 


for  the  rod  in  the  Y-direction 

for  the  rod  in  the  Z-direction  (D-4) 

for  the  rod  at  45°  to  Y-Z  (m45) 


where  p  is  the  mass  density  and  the  subscript  45°  refers  to  data  from  bar  M45. 

It  should  be  noted  that  the  results  are  not  affected  at  all  or  negligibly  by  the 
presence  of  glue  Joints  due  to  the  manner  of  construction  of  the  specimens.  The 
results  of  these  tests  are  summarized  in  Table  2. 

b)  Split  Hopkinson-Bar  Experiments. 

(12) 

The  split  Hopkinson-bar  tests'  were  performed  not  only  for  the  purpose  of 
obtaining  the  dynamic  elastic  constants  of  the  material  by  an  alternative  technique, 
but  also  to  examine  the  strength  characteristics  of  the  substance  at  loading  rates 
higher  than  those  produced  in  the  quasi-static  experiments.  The  sample  examined 
consisted  of  the  contoured  specimen  employed  for  the  quasi-static  tensile  tests; 
its  size  is  large  compared  to  that  usually  employed  in  this  type  of  test,  but  it 
was  believed  that  this  geometry  represented  the  minimum  distance  necessary  to  prevent 
the  alteration  of  macroscopic  mechanical  properties  due  to  the  fabrication  process. 
The  shape  exhibited  the  advantages  of  known  boundary  conditions  on  the  end  faces  of 
the  contoured  region  that  is  integral  with  the  larger  diameter  rock  cylinder  and 
consequent  elimination  of  any  frictional  effects,  the  use  of  identical  geometries 
for  both  tensile  and  compressive  tests  and  comparison  with  quasi -static  results  fcr 
the  same  geometry,  and  the  localization  of  the  maximum  stress  in  the  vicinity  of 
the  strain  gage  location  at  the  contour  center  appro  .imatin,.,  the  achievement  of 
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the  goal  of  simultaneous  stress  and  strain  measurement  at  the  same  position. 
Concomitant  disadvantages  include  the  difficulties  of  specimen  fabrication  and 
the  problem  of  accurate  determination  of  the  stress  history  for  short  pulses 
and/or  anelastic  material  properties.  However,  since  the  ratio  of  specimen  length 
to  wavelength  is  less  than  l/8  and  the  material  is  nearly  elastic/brittle,  the 
second  objection  is  mitigated. 

Fig.  14  presents  the  configuration  of  the  split  Hopkinson  bar  tests;^15^  a 
compressive  and  essentially  one -dimensional  pulse  of  about  200  jisec  duration 
produced  by  the  impact  of  £~in.  diameter  30°  cylindro-conical  hardened  steel 
projectile  fired  from  a  pneumatic  propulsion  device  travels  through  an  elastic 
aluminum  loading  bar  to  the  specimen  which  passes  the  major  portion  of  the  wave 
onto  the  succeeding  output  or  record  bar  where  the  transmitted  stress  history 
is  recorded  by  a  pair  of  coupled  longitudinal  strain  gages.  The  strain  history 
is  monitored  by  a  pair  of  gages  at  the  center  of  the  contoured  section.  An 
important  feature  of  these  waveforms  is  the  nearly  linear  wavefront  that  yields 
a  relatively  constant  strain  rate.  Tensile  pulses  were  produced  with  the  aid  of 
a  somewhat  shorter  projectile  by  permitting  the  initial  transient  to  reflect  at  the 
distal  end  of  the  unit  and  reversing  the  role  of  the  loading  and  recording  bars, 
with  the  stress  histories  deduced  from  strain  outputs  on  the  loading  bar.  The 
transient  recording  and  triggering  arrangement  has  been  previously  described. 

Each  specimen  was  cemented  between  the  loading  and  recording  bars  by  means 
of  Scotchweld  Structural  Adhesive;  the  entire  unit  was  carefully  aligned  both  in 
a  horizontal  position  and  coaxially  with  the  centerline  of  the  gun  to  minimize 
the  introduction  of  bending.  Two  other  steps  were  taken  to  reduce  flexural  effects: 
a  bending  suppressor  consisting  of  a  1"  O.D.  x  6"  long  section  of  acrylic  tubing 
1/8"  thick,  which  was  successfully  employed  in  previous  Hopkinson  bar  experiment s^ 15  \ 
was  slip-fit  over  the  loading  bar  4|  in.  from  the  specimen,  and  the  length  of  the 
loading  bar  was  chosen  as  5  feet  to  reduce  any  interference  by  the  much  more  slowly 
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travelling  flexural  components  with  the  primary  longitudinal  pulse  in  the  test 
section. 


•me  stress  history  at  the  center  of  the  gage  section  was  deduced  from  the 
strain  gage  outputs  on  the  aluminum  bar  with  the  aid  of  uniaxial  elastic  wave 
propagation  theory.  The  assumptions  present  in  such  an  analysis  include  the 
uniform  distribution  of  stress  across  the  section  and  the  neglect  of  lateral  inertia 
and  shear  as  well  as  the  hypothesis  of  plane  sections,  the  elastic  behavior  of  the 
specimen  and  small  values  of  the  measured  strain,  the  equivalence  of  a  system 
composed  of  a  unifora  cylindrical  rod  of  the  sar.e  length  and  constant  minimum 
diameter  for  the  contoured  specimen  actually  utilized,  and  the  absence  of  an 
effect  of  an  initial  compressive  wave  on  the  tensile  properties  of  the  sample. 

Th*  equivalent  hypothesized  here  actually  represents  an  extremal  case 

since  the  discontinuity  actually  present  is  not  as  severe.  The  other  assumptions 

are  either  reasonable  or  have  been  deliberately  satisfied  by  the  choice  of  the 
experimental  conditions. 

Based  on  the  above  considerations,  the  stress'at  the  center  of  the  test 
specimen  a<t>  can  be  evaluated  from  measured  data  by  means  of  the  relation 


a<fc>-rEa*r<t>  [t-(2T~ + 

"  °r  °a 


(d-5) 


vhere  A  is  the  cross-section  area,  t  is  time,  ^  is  the  specimen  length,  l  is 

£L 


the  distance  of  the  record  gage  from  the  rock-aluminum  interface,  and  subscripts 
r  and  a  refer  to  rock  and  aluminum,  respectively.  The  most  serious  error  in  the 
p  per  application  of  Eq.  (D-5)  results  from  even  small  inaccuracies  in  the  time  lag 
td  between  stress  and  strain  readings  and  not  in  the  analytical  model  of  the  process. 
Utilizing  the  relations  developed  for  one-dimensional  wave  propagation  in  bars 

/  _  r.  I 


with  discontinuities ^  \  the  abrupt  change  in  geometry  involved  providing  the 


equivalent  system  for  the  use  of  Eq.  (D-5)  yields  a  stress-strain  curve  with  only 
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a  5  percent  higher  modulus  and  maximum  stress,  albeit  with  noticeable  hysteresis 
relative  to  the  correct  results  produced  for  an  infinite  ratio  of  wavelength  to 
specimen  length^* \ 

A  total  of  nine  contoured  specimen  from  the  Y-  and  Z-direction  were  tested  in 
tension  or  compression  by  means  of  the  split  Hopkinson  bar  technique.  Typical 
results  are  shown  in  Figs.  15,  l6,  17  and  10,  where  d  represents  the  eccentricity 
of  the  striking  projectile.  A  summary  of  the  tests  is  presented  in  Table  3. 

VI.  Discussion  and  Conclusions. 

The  accuracy  of  the  assignment  of  the  Z-direction  as  the  axis  of  transverse 
isotropy  as  shown  in  Fig.  1  is  supported  by  optical  observation  of  the  preferred 
orientation  of  calcite  crystals,  by  visual  examination  of  the  slab  bedding  planes, 
by  the  "grain"  of  the  rock  experienced  when  specially-contoured  tensile  and  split 
Hopkinson  bar  specimens  were  fabricated,  by  the  maximum  strength  anisotropy  observed 
experimentally,  and  by  the  anisotropy  of  initial  and  secondary  moduli  associated 
with  the  static  stress-strain  curves  obtained.  If  maximum  compressive  stress 
transverse  isotropy  is  to  coincide  with  the  Z-axis,  the  maximum  compressive  stress 
in  the  X-  and  Y-directions  should  be  identical.  Using  the  formula  suggested 

by  Obert  et  al  ^  to  correct  for  the  short  column  iength  used  in  the  X-direction 
specimens , 

a  =  ao(0*8  +  I7§)  (D-6) 

where  a  =  oQ  at  L/D  =  1,  L  is  the  specimen  length  and  D  is  the  specimen  diameter, 
X-direction  specimens  exhibit  compressive  strengths  approximately  5$  higher  than 
Y -direct  ion  specimens.  However,  Z-direction  specimens  have  cc^ressive  strengths 
from  38#  to  7 llo  higher,  depending  on  strain  rate.  From  the  data  of  Section  Ilia, 
the  initial  modulus  E1  and  secondary  modulus  E2  show  the  same  anisotropy;  thus, 

*he  orientation  of  the  axis  of  transverse  isotropy  for  the  slab  is  well  established. 

The  deternnination  of  the  five  elastic  constants  from  quasi-static  compression 


cf.  Thesis  by  S.  P.  Howe 
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test,  was  hampered  by  the  faet  that  the  material  exhibited  a  hysteresis  leap 
even  at  low  stress  levels.  Another  serious  problem  was  presented  by  the  existence 
Of  ar  apparent  "first  cycle"  effect  such  as  shown  In  Fig.  8.  At  stresses  below 
300  psl,  this  effect  could  be  neglected  remitting  the  calculation  of  "elastic 
constants";  however,  the  extremely  low  strain  at  this  level  prevented  the  deter- 
mination  of  accurate  value,  results,  it  is  tempting  to  ignore  the  Initial  non¬ 
linear  region  of  the^stress-straln  curve  and  consider  only  elastic  constants  based 
on  the  region  to  -jS  .  This  concept  suffers  from  two  deficlences:  the  region 
is  only  one  third  the  stress  range  of  the  material  and  the  generalised  Poisson-, 
ratio  „  and  /  are  not  constant  in  this  region,  in  the  range  ^  to  fracture,  the 
instantaneous  tangent  modulus  decreases  as  stress  increases.  Since  the  creep  tests 
performed  indicated  a  strong  time  dependence  at  stresses  higher  than  ^  .  any 

hope  of  the  existence  of  a  linear  elastic  constitutive  equation  in  that  region 
vanishes . 

The  stress-strain  curves  from  quasi-static  tension  tests,  such  a.  Fig,.  9 
10,  were  linear  only  at  very  low  stress  levels.  In  constrast  to  the  compression 
tests,  the  instantaneous  tangent  modulus  continued  here  to  decrease  with  increasing 
stress.  The  values  of  %  in  tension  agree  closely  with  those  of  %  in  compression 
vhlle  the  magnitudes  of  q  in  tension  lie  between  those  of  EJ  and  ^  in  compression. 

in  the  -ange  of  quasist.tic  strain  rates  alloyed,  10'7  to  10'2  per  second,  the 
general  shape  of  the  stress-strain  curves  did  not  change.  Although  maximum  stress 
increases  with  increased  strain  rate,  there  seems  to  be  virtually  „0  rate  effect 
on  the  initial  or  tangent  modulus  in  this  domain.  A  comparison  between  compressive 
and  tensile  static  and  dynamic  moduli  is  presented  in  Table  1  of  the  main  report. 

The  dynamic  data  is  generally  higher  than  corresponding  static  values;  this  effect 
is  greater  in  compression  than  tension,  and  greater  in  the  Y-  than  in  the  Z-dlrectlon. 
Values  obtained  using  Hopklnson  or  split  Hopklnson  bars  are  similar  In  spite  of  the 
difference  in  the  strain  regions  over  which  the  moduli  were  computed. 
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Ricketts’  y*  obtained  the  Matlc  elastic  constants  for  one  of  the  carblc 
blocks  employed  In  the  present  v*.*«  propagation  tests  by  cutting  out  —  wedges 
froa  one  edge  ard  subjecting  the  sar7.es  to  covpresslve  tests  in  an  I  ns  Iron 
nachlnc  at  the  rate  of  0.01  ln/aln.  The  rpeclmen*  were  chosen  along  directions 
believed  tc  be  principal  axes;  hcvever,  the  orientation  deviates  b /  about  15° 
fro*  the  axis  of  elastic  ty**etry  selected  in  t»  e  present  tests.  He  also  obtained 
four  corresponding  dynaclc  constants  for  the  saae  block  by  p-vave  velocity 
neasurcsicnts  in  different  directions;  the  fifth  constant  could  not  be  obtained 
without  an  actual  shear  wave  measurement  vhlch  was  not  executed.  Consequently, 
this  quantify  vas  scaled  upward*  fro*  Its  static  value  by  the  average  Increase  of 
the  other  constants  under  dyuaslc  conditions.  These  constants  are  compared  In 
Table  -  vtth  the  results  fnat  tw*  wave  velocity  swasuramsnt  utilising  the  oabedded 
crystals  that  also  Involve  the  sane  block  as  veil  as  the  compressive  l'opfclnscn 
bar  data  of  the  present  Investigation  for  the  Initial  (or  tangent)  modulus.  It 
should  be  emphasised  that  the  latter  data  were  obtained  fro*  a  different  parent 
block  and  are  based  m  the  values  given  In  Table  1  of  the  main  part.  The  con¬ 
version  of  the  ssoduli  E,  E',  C'  and  Poisson  ratios  u  and  to  the  stiffness 
coefficients  Cj  Is  accomplished  by  m**ans  of  the  relations^ 


cll  ■  4  it;’  ••  '1?  •  i<F3  •  TT^1  * 

C13  4  rs  !  CJ3  *  u1  'u  •  °'i  8  •  fr  <#‘7> 

The  values  of  the  clastic  constants  obtained  in  the  l  opklr.son  bar  tests 
with  specimens  cored  fro*  the  sarbl«  slab  are  generally  so-ev*  *•  higher  tha.  those 
derived  fro*  the  lnten  nl  velocity  Rraeurrsen’s  f  the  Barb>  block,  but  lover 
than  the  cor-etpcndlrg  data  obtained  by  Ricketts  *  .  It  is  believed  that  there 


may  be  a  systematic  err  r  in  the  wave  speed  da»a  dti*  to  an  Inability  to  account 
for  cir  V  dclaj  In  the  triggering  o.  he  Initial  slrmal  In  these  erperiaents, 


yielding  a  .hort.r  trnn.it  time  end.  ccm.equently,  a  higher  value  of  the  elaetle 
constant.  It  la  alao  clear  that  It  night  be  possible  to  obtain  value,  of  the 
dynamic  constant,  lover  than  pre.un.bljr  corresponding  at.tlc  values  if  the  former 
are  based  on  value,  of  the  Initial  tangent  modulu.,  whereas  the  latter  are 
calculated  from  the  slope  of  the  middle  third  of  the  compre.alv,  stress-train 
curve.  Comparison  between  my  constants  should  always  be  executed  at 
approximately  the  same  strain  level  and  strain  rat,  and  in  the  ,ane  node  of 
loading.  A  comparison  of  the  moduli  and  Pols.on  ratio,  obtained  In  the  pre.ent 
sequence  of  tests  Is  presented  in  Table  1  of  the  main  body  of  the  report,  dynamic 

constants  uniformly  exhibited  higher  value,  than  the  corresponding  at.tlc 
magnitudes. 

The  variation  of  compressive  and  tensile  strength  as  a  function  of  .train 
rate  is  presented  In  Figs.  l9  20,  respectively.  Increased  maximum  comprc.lv, 
stress  with  increased  strain  rate  1.  more  pronounce  along  the  axl.  of  treat- 
isotropy  while  this  trend  1.  reversed  in  tension.  These  result,  reinforce  an 
intuitive  feeling  for  Yule  marble  as  a  material  extremely  veah  in  tension,  partlcuUrIy 
when  tensile  forces  act  perpendicular  to  the  bedding  planes. 

The  creep  tests  performed,  although  of  a  preliminary  nature,  provide 
additional  insight  into  the  mechanical  response  of  the  material.  The  test  results 
imply  that  Yule  marble  cannot  be  treated  as  .  brittle  solid  even  at  aablent 
temperatures  and  pressures.  It  appears  that  time  effects  become  Important  to 
material  response  at  stresses  near  for  compressive  loading.  It  must  be 
emphasised  that  these  tests  point  to  the  presence  of  some  time  dependence  and  the 
importance  of  this  effect  at  stresses  above  in  a  small  range  of  quasl-.t.tlc 
Strain  rates  rather  than  an  attempt  to  fonnulatc  a  complete  constitutive  equation 
for  the  material.  Tensile  tests  also  Indicate  little  time  dependence  at  low 
stress  levels  but  a  definite  time-dependence  near  failure. 
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In  conclusion,  it  nay  be  stated  that  the  characteristics  of  this  particular 
r*k,  homogeneous  and  of  low  order  anisotropy  as  it  is,  present  major  problems 
relative  to  on  attempt  to  formulate  a  three-dimensional  constitutive  equation. 
Initial  elastic  constants  are  valid  only  for  extremely  small  strains.  Tensile 
and  compressive  moduli  differ.  The  material  exhibits  a  "first  cycle"  effect. 

The  rock  is  not  brittle  but  rather  has  some  small  time-dependent  plastic  region. 
Although  the  general  chape  of  stress-strain  curves  both  along  the  axis  of  elastic 
symmetry  and  perpendicular  to  it  are  of  a  characteristic  shape  and  show  little 
time  dependence  at  quasi-static  strain  rates,  hysteresis  accompanies  unloading 
at  any  stress  level  above  the  small  region  where  the  initial  elastic  constants 
are  vali  .  Dynamic  elastic  constants  arc  higher  than  corresponding  static 
values.  In  the  dynamic  range  of  strain  rates,  tensile  and  compressive  elastic 
constants  differ  significantly.  As  a  result,  Yule  marble  is  "characterized" 
by  a  set  of  experimental  data  rather  than  an  analytical  formulation  and  does 
not  conform  to  any  published  constitutive  equation  cited  in  the  literature  to 


date. 
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SPECIMEN 
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IY-2 

LY-5 

LY-6 

FZ-1 

FZ-3 

KZ-13 

KZ-14 

KZ-15 

FZ-3-1 

JZ-10-1 

JZ-10-2 

Fr-3 

LY-11-1 


TABLE  1:  QUASI  STATIC  TENSILE  TEST  RESULTS 


GEOMETRY 

e 

sec"1 

m  1 
eecrl 

E. 

xio6 

inn6 

XIO 

% 

lO'3 

<m 

^iin/in 

% 

10J 

2.8X10"? 

5.8X10"? 

4.9X10";? 

1.0X10"5 

psi 

psi 

psi 

psi 

6”x3/4',D 

If 

II 

ft 

- 

6.7 

7.8 
9.6 

11.0 

: 

.62 

1.0 

.33 

1.2 

120 

250 

270 

180 

- 

II 

II 

II 

II 

1.7X10;7 
4X10 "6. 
1.7X10";? 
4.2X10"; 

- 

4.2 

2.3 
3.2 
3.2 

- 

.34 

.41 

.42 

100 

540 

- 

II 

1.0X10" 3 

- 

. 

•  50 
.55 

570 

400 

- 

S.C. 

II 

II 

2.2X10"^ 

1.5X10"4 

1.3X10"' 

4.8 

3.8 
4.2 

- 

•  49 
.25 
.46 

280 

250 

260 

m 

2"xl.05"D 

S.C.** 

8.6X10"* 

1.1X10"5 

2. 4X10" J 
4.0X10"5 

6.3 

IO.5 

8,3 

'9.4 

7.6 

8.0 

3290+ 

865 

7.4 

6.6 

* 

x 

g 

inches 


2-3  A 
2-3/4 
2-3/4 
2-3/4 

2-3/4 


i/2 

3/8 

2-3/8 


* 

Xg  ls  the  distance  of  fracture  path  from  gage. 

## 

S.C.  Special  contour  specimen 
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TABLE  2:  AVERAGE  VALUES  OF  HOPKINS  OK  BAR  TEST  RESULTS 


MODE 

Tens. 

Comp. 


Rod 

Wave  Dynamic 
Velocity  Elastic 
co,10^in/sec  Constant 


Approximate  Strain 
Level,  (jln/in 


c 

1 

210  +  5 

Ed  -  11.6+0.7x10^ psi 

70 

T 

I 

205  +  5 

E^  ■  10.8+0.6xl0^psi 

55 

C 

140  +  2 

Ed  »  4.9+0.2x10^ psi 

1^5 

T 

112  +  4 

m 

-  3.2+0.4xl06psi 

80 

C,T 

152  +  2 

m 

°d  "  ^*3+0.3xl06psi 

120 

C 

«  •  m  • 

Mq  *  0.29  +  0.01 

75 

T 

— - 

Mg  -  0.24.+  0.03 

80 

C 

Ug  -  0.13  +  0.01 

150 

T 

— — 

\\ [  -  0.09  +  0.01 

95 

TABLE  3:  SPLIT  HOPKDiSON  BAR  RESULTS 


SPECIMEN 

MODE 

Tens. 

Cocrp. 

A 

10  psl 

• 

c 

sec"1 

103pol 

« 

cax 

^n/ln 

ly-13-1 

C 

10 

11 

13 

3000* 

LY-12-1 

C 

10 

13 

14 

3800* 

JZ-9-2 

c 

6.7 

29 

* 

23 

5500* 

JZ-9-1 

c 

6.7 

40 

26 

8500 

JZ-11-1 

c 

7.3 

45 

25 

7700 

LY-13-2 

T 

13.0 

8 

1.8 

700 

LY-12-2 

T 

9.5 

11 

3.8 

770 

JZ-12-1 

T 

2.8 

16 

.97 

1200* 

JZ-11-2 

T 

4.1. 

10 

.83* 

650* 

Uncertain 


